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1.0 ABSTRACT 


THE PURPOSE OF THIS EXERCISER 1S TO QUICKLY VERIFY THAT THE SERIAL BUS 
SYSTEM, (ISB11A, SERIAL BUS AND UP TO A TOTAL OF 63 FDC TERMINALS) 
SHOWS THE EXISTENCE OF NO MAJOR PROBLEMS, UNDER AN RSX11M TYPE 
OPERATING SYSTEM. THE PROGRAM ALLOWS THE OPERATOR TO EXERCISE ANY, OR 
ALL OF THE FOC TERMINALS (UP TO 63 AT ONE TIME) ATTACHED TO THE SERIAL 
BUS. THE EXERCISER DRIVES ANY TERMINAL WHICH SUBSCRIBES TO THE 
CURRENT SERIAL BUS PORT PROTOCOL(IE.-LOOP MODE). S DATA TRANSFER TO 
TERMINALS ON THE SERIAL BUS ARE PRECEDED BY A “LOOP” MAINTENANCE 
COMMAND. THIS CAUSES THE ADDRESSED TERMINAL TO RETURN THE RECEIVED 
OATA TO THE HOST SYSTEM, EXACTLY AS IT WAS RECEIVED BY THE TERMINAL. 
DATA PATTERNS AND DATA MESSAGE LENGTHS ARE VARIED TO EXERCISE THE 
ate aaa TO MAXIMUM. ALL ERRORS ARE REPORTED THROUGH A HOST 


2.0 WARDWARE REQUIREMENTS 


PDOP-11 FAMILY OF COMPUTERS, EXCEPT THE LSI-11 
CONSOLE TELETYPE 

16K MEMORY 

ISB11A (SERIAL BUS CONTROLLER) 

SERIAL BUS - OR 1SB11-A TEST CABLE 

1-63 FACTORY DATA COLLECTION TERMINALS 


3.0 SOFTWARE REQUIREMENTS 


RSX-11M DISK BASED REALTIME OPERATING SYSTEM 
THE DPM - "DISTRIBUTED PLANT MANAGEMENT” SOFTWARE PACKAGE 


3.1 RSX-11M OPERATING SYSTEM 


THE RSX-11M IS A SMALL TO MEDIUM SIZED REAL TIME MULTIPROGRAMMING 
SYSTEM WHICH UTILIZES 16K TO 124K WORDS OF MEMORY. OR 128K TO 1024K 
WORDS OF PDOP-11/70 MEMORY. THE 16K SYSTEM ALLOWS 8K FOR USER TASKS 
AND INCLUDES A SUBSET MACRO PACKAGE. A MINIMUM OF 24K WORDS ARE 
REQUIRED FOR FULL MACRO SUPPORT.CONCURRENT PROGRAM DEVELOPMENT AND 
APPLICATION TASKS EXECUTION, OR MEMORY MANAGEMENT SUPPORT. 


4.0 PROGRAM GENERATION 


THE FILE TO BE LOADED AND RUN IN SYSTEM'S MEMORY IS THE TASK FILE 
DOZKCH. TSK. 1T tS GENERATED FROM THE SOURCE FILE DZKCH. MAC BY USING 
RSX-11M INDIRECT FILES. AN INDIRECT FILE DZKCH. CMD CONTAINS A LIST OF 
MCR COMMANDS. AND |S INVOKED BY TYPING: 
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“@LOZKCH” 
UPON WHICH THE CONSOLE WILL PRINT THE FOLLOWING: 
MAC DZ2KCH. OBJ, OZ2KCH. LST=DIAGSUPER/ML. DZKCH. MAC 


TKB @TKBOZKCH 

Fag Tene wanent SEPOREKCH. O84. O/ROSUPER 
UNITS=75 

STACK=512 

4 / 


THE FOLLOWING 1S AN EXPLANATION OF THE CONSOLE PRINTOUT: 
DZ2KCH, OBJ, OZ2KCH. LST=DIAGSUPER/ML, DZKCH. MAC 


THIS ASSEMBLES THE SOURCE FILE DZKCH MAC WITH THE DIAGNOSTIC 
SUPERVISOR MACRO PACKAGE DIAGSUPER/ML, INTO AN OBJECT FILE DZKCH. OBJ 
FOR TASK BUILDING BY THE RSX11-M TASK BUILDER. THE SWITCH /ML ON THE 
FILE DIAGSUPER SPECIFIES THE FILE AS A USER'S MACRO LIBRARY. THE 
POP-11 DIAGNOSTIC SUPERVISOR 1S NEEDED FOR ASSEMBLING THE PROGRAM, AND 
IS DESCRIBED IN 4. 1 


DZKCH. TSK, DZ2KCH. MAP=DZKCH. OBJ, DIAGSUPER 


THIS TASK-BUILOS THE OBJtCT FILE OZKCH. OBJ WITH THE DIAGNOSTIC 
SUPERVISOR OBJECT LIBRARY DIAGSUPER, INTO A TASK IMAGE OZKCH. TSK TO BE 
RUN IN SYSTEM'S MEMORY. DZ2KCH. MAP 1S A FILE WHICH CONTAINS THE MEMORY 
ALLOCATION MAP. THE TASK BUILDER SWITCHES 7. UNITS=75,. STACK=512, //, 
ARE NOT PRINTED OUT ON THE CONSOLE, BUT ARE CONTAINED IN THE INDIRECT 
COMMAND FILE “TKBOZKCH. CMD" AND ARE DESCRIBED IN THE RSX-11M TASK 
BUILDER REFERENCE MANUAL. RSX-11M TASK BUILDER REFERENCE MANUAL. 


4.1 DIAGNOSTIC SUPERVISOR 


GENERAL------~- 


THE POP-11 DIAGNOSTIC SUPERVISOR IS A MODULARIZED DIAGNOSTIC MONITOR 
WHICH SERVES THE POP-11 FAMILY OF COMPUTERS BY PROVIDING RUN-TIME 
SUPPORT FOR FUNCTIONAL OR REPAIR LEVEL DIAGNOSTICS. THE DIAGNOSTICS 
ARE DESIGNED FOR SUPERVISOR COMPATIBILITY. AND CREATED FOR DESIGN 
ENGINEERING. MANUFACTURING. OR FIELD ENGINEERING USAGE. FUNCTION 
LEVEL PROGRAMS PROVIDE FOR ERROR DIAGNOSIS AT A HARDWARE FUNCTION 
LEVEL. WHILE REPAIR LEVEL DIAGNOSTICS PROVIDE FOR REPAIR AT A MODULE 
LEVEL; AS SUCH. THEY EXERCISE. DIAGNOSE, OR TEST INDIVIDUAL 
PERIPHERALS. MEMORY SUBSYSTEMS. PROCESSOR OPTIONS. OR ENTIRE SYSTEMS. 


SEPARATE STAND ALONE (OFF LINE) AND USER MODE (ON LINE) VERSIONS OF 
THE SUPERVISOR COMMONLY PROVIDE NON-DIAGNOSTIC SERVICES FOR A SINGLE 
PROGRAM, OR A SCRIPT OF PROGRAMS. THAT HAVE BEEN PREVIOUSLY ASSEMBLED. 
IN A STAND ALONE ENVIRONMENT THE SUPERVISOR SHARES RESIDENCY WITH THE 
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DIAGNOSTIC(S) ONLY. WHiLe IN USER MODE THE SUPERVISOR AND THE 
DIAGNOSTIC(S) RESIDE WITH BOTH AN OPERATING SYSTEM AND THE USER 
PROGRAM(S). HOWEVER, IN EITHER ENVIRONMENT. SUPERVISOR SERVICES ARE 
ELICITED BY A RESIDENT DIAGNOSTIC VIA THE GENERATION OF UNIQUE MACRO 
CALLS TO THE SUPERVISOR. IN THIS MANNER THE FOLLOWING NON-DIAGNOSTIC 
SERVICES CAN BE INITIATED FOR A PROGRAN. 


THE EXECUTION OF EACH SECTION OF A DIAGNOSTIC. 
THE LOOPING OF TEST PROGRAMS. 

THE REPORTING OF HARDWARE ERRORS. 

THE REPORTING OF UNEXPECTED INTERRUPTS. 

THE PRINTING OF MESSAGES. 


FUNCTION LEVEL PROGRAMS CAN OPERATE IN EITHER A STAND ALONE OR A USER 
MODE ENVIRONMENT WITHOUT SOURCE CODE MODIFICATION. HOWEVER, REPAIR 
LEVEL PROGRAMS MUST OPERATE IN A STAND ALONE ENV!RONMENT ONLY. 


ONCE THE SUPERVISOR IS LOADED A STANDARDIZED OPERATOR INTERFACE IS 
ESTABLISHED, PROVIDING A COMMUNICATIONS PATH THROUGH WHICH AN OPERATOR 
CAN DIRECT THE SUPERVISOR TO INITIATE THE LOADING AND EXECUTION OF A 
DIAGNOSTIC PROGRAN. INTERFACE DIALOGUE ALSO ALLOWS AN OPERATOR TO 
EXAMINE AND/OR MODIFY THE CONTENT OF THE GENERAL REGISTERS. AND THE 
CONTENTS OF THE MEMORY LUCATIONS UTILIZED BY THE DIAGNOSTIC(S). IN 
ADDITION, THE INTERFACE ALLOWS AN OPERATOR TO ACCESS SEPARATE UTILITY 
PROGRAMS THAT ARE ALSO LOCATED ON THE DIAGNOSTIC LOAD MEDIA, AND ARE 
ASSOCIATED WITH THE SUPERVISOR PACKAGE. THE UTILITY PROGRAMS PERMIT 
AN OPERATOR TO INSTALL FIELD CHANGES TO A DIAGNOSTIC, AND TO BUILD OR 
MODIFY SCRIPT AND CONFIGURATION FILES. 


THE SERVICING OF FUNCTIONAL OR REPAIR LEVEL PROGRAMS OPERATING UNDER 
THE CONTROL OF A STAND ALONE VERSION OF THE SUPERVISOR. CAN BE 
INDIRECTLY CONTROLLED FROM AR SEPARATE COMPUTER BY A LOCAL OR REMOTE 
DIAGNOSTIC MONITOR, SUCH AS THE AUTOMATED PRODUCT TEST (APT/APT-RD). 
UNDER INDIRECT CONTROL. AN OPERATOR INTERFACE 1S ESTABLISHED WITH THE 
LOCAL (E.G. APT) OR REMOTE (E.G. APT-RD) MONITOR AND THE SUPERVISOR 
IS DIRECTED TO LOAD AND EXECUTE PROGRAMS VIA MONITOR COMMANDS. 


FINALLY. IN ADDITION TO THE OFF AND ON LINE VERSIONS OF THE 
SUPERVISOR, THERE IS A SPECIAL VERSION DEFINED AS A PROGRAM 
DEVELOPMENT SYSTEM(PDS). THE PDS VERSION INCLUDES BOTH DEBUG AND 
UPDATE UTILITIES AS CORE RESIDENT FEATURES AND IS ESSENTIALLY A SUPER 
SUBSET OF THE BASIC STAND ALONE VERSION. 


5.0 POP11 FAMILY COMPATIBILITY 


THIS TEST WILL RUN ON THE PDP-11 FAMILY OF COMPUTERS EQUIPPED WITH THE 
HAROWARE IN 2.0, TOGETHER WITH THE SOFTWARE IN 3.0 
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6 0 OPERATING SYSTEM COMPATIBILITY 


THE EXERCISER 1S DESIGNED TO RUN WITH RSX11M/S-BASED OPERATING SYSTEMS 
ASSEMBLED WITH THE DIAGNOSTIC SUPERVISOR. 


7.0 TESTING METHODOLOGY 


BEFORE EXECUTION OF THIS TEST IS ATTEMPTED, THE FOLLOWING TESTS SHOULD 
BE SUCCESSFULLY RUN IN THE FOLLOWING ORDER: 


1, ALL APPLICABLE POP11 ¢.P.U. TESTS 
f 
Z. 1SB11A STAND ALONE DIAGNOSTICS. 


A. O2KCC 
B. D2ZKCO 
€C. DO2KCA 
D. O2KCE 
E. O2KCF 


F. FOLLOWING THESE STAND ALONE TESTS. THE 1S5B11A SHOULD BE 
CONNECTED TO 1-63 RT801, 803, OR 805 TERMINALS VIA THE SERIAL 
BUS, OR 1SB11-A TEST CABLE AND THE EXERCISER SHOULD BE RUN. 


8.0 PROGRAM CONSIDERATIONS 


THIS 1S A FUNCTION LEVEL PROGRAM, AS OPPOSED TO A REPAIR LEVEL PROGRAN 
(AS EXPLAINED IN 8.1 AND 8.1.1). DESIGNED FOR RSX-11M AND SUPERVISOR 
COMPATABILITY. AND CREATED FOR DESIGN ENGINEERING, MANUFACTURING. OR 
FIELD ENGINEERING USAGE. AS A FUNCTION LEVEL PROGRAM, {iT EXERCISES 
THE FOC TERMINALS ON THE SERIAL BUS SYSTEM. 


8.1 FUNCTION LEVEL DIAGNOSTIC PROGRAMS 


FUNCTIONAL LEVEL PROGRAMS ARE FIRST LEVEL DIAGNOSTICS THAT ARE SIMILAR 
TO USER MODE LEVEL-2 PROGRAMS IN THAT THEY REQUIRE THE TOTAL 
DEDICATION OF THE DEVICE UNDER TEST WHILE DIRECT ACCESS TO THE DEVICE 
REGISTERS IS NOT PERMITTED. HOWEVER. DATA CAN BE EXCHANGED WITH A 
DEVICE VIA THE IMPLEMENTATION OF 170 ROUTINES SUCH AS THOSE ENGENDERED 
BY THE QI10S$ DIRECTIVES USED IN RSX-11M. IT SHOULD BE NOTED, HOWEVER, 
THAT RUNNING UNDER OPERATING SYSTEM CONTROL, STABLE PROGRAM LOOPS 
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CANNOT BE GAURANTEED FOR FUNCTION LEVEL PROGRANS. 


8.1.1 REPAIR LEVEL DIAGNOSTIC PROGRAMS - REPAIR LEVEL PROGRAMS ARE 
SECOND LEVEL DIAGNOSTICS THAT ARE SIMILAR TO USER MODE LEVEL-3 
PROGRAMS IN THAT THEY REQUIRE THE TOTAL DEDICATION OF THE DEVICE UNDER 
TEST, AND DIRECT ACCESS TO DEVICE REGISTERS !S ALLOWED. IN ADDITION. 
SINCE REPAIR LEVEL DIAGNOSTICS CANNOT BE RESIGNED TO A USER MODE (ON 
LINE) ENVIRONMENT. PROGRAM LOOPS ARE APPLICABLE. 


9.0 XXxOP 


THE PROGRAM RUNS ON LINE TO THE OPERATING SYSTEM RSX-11M, AND 
THEREFORE WILL NOT RUN UNDER XXDP. 


10,0 ACT/APT 
THE PROGRAM 1S NEITHER ACT NOR APT COMPATIBLE. 


11.0 MEMORY MANAGEMENT 
THIS PROGRAM DOES NOT DIRECTLY UTILIZE OR TEST MEMORY MANAGEMENT. 


12.0 EXECUTION TIME 


1. DATA TRANSACTION- ONE DATA PATTERN. ONE DATA LENGTH, TO ONE 
TERMINAL, ESTIMATED TIME 7MS. 


PARTIAL PASS- ONE PATTERN. ALL DATA LENGTHS, TO ALL (63) 
TERMINALS IS ESTIMATED TO BE SOMS. 


5. FULL PASS- ALL PATTERNS. ALL DATA LENGTHS, TO ALL (63) 
TERMINALS TAKES TO 2.5 SECONDS. 


Nn 


13.0 PROGRAM CONTROL PROCEDURES 


THE PROGRAM IS RUN ON LINE IN RSX-11M OPERATING ENVIRONMENT AND IS 
pe a BY RSX (MCR) OR DIAGNOSTIC SUPERVISOR MONITOR COMMAND 
LANGUAGE. 
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15.1 COMMAND LANGUAGE 


THIS SECTION DESCRIBES THE OPERATOR COMMANDS. THAT PROVIDES FOR THE 
rh bi lg MANIPULATION OF PROGRAMS BY RSX-11M AND THE DIAGNOSTIC 


13.1.1 RSX-11M COMMAND LANGUAGE - 
PUN - THE RUN DIRECTIVE CAUSES A TASK TO BE REQUESTED. 


CONTROL C ~ ACTIVATING CONTROL C GETS THE OPERATOR BACK TO MCR AND 
RABORTS THE PROGRAN. 


13. 1.1.1 DIAGNOSTIC SUPERVISOR COMMAND LANGUAGE - 


UPON PROGRAM EXECUTION, AND TO RETURN TO SUPERVISOR COMMAND MODE, THE 
OPERATOR SHOULD TYPE “CONTROL A”. THE PROGRAM WILL RESPOND WITH THE 
PROMPT OCP-A>, WHEREIN ANY ONE OF THE DIAGNOSTIC SUPERVISOR COMMANDS 
CAN BE ENTERED. FOR EXAMPLE: 


CONTROL A 

DCP-A> STA 

DCP-A>RES 

DCP-A>CON 

THESE DIAGNOSTIC SUPERVISOR COMMANDS ARE DESCRIBED BELON. 


START PROGRAM (STA) - THE START PROGRAM COMMAND INITIATES THE 
EXECUTION OF THE PROGRAM CURRENTLY CONTAINED IN MAIN MEMORY, INCLUDING 
THE DIALOGUE PORTIONS. 


RESTART PROGRAM (RES) - THE RESTART PROGRAM COMMAND 1S SIMILAR TO THE 
START PROGRAM COMMAND WITH THE EXCEPTION BEING THAT DIALOGUE PORTIONS 
OF THE PROGRAM CAN ONLY BE EXECUTED VIA AN APPROPRIATE OPERATOR 
RESPONSE TO A SUPERVISOR QUERY. HOWEVER IT {IS ASSUMED THAT THE 
REQUIRED CONFIGURATION PARAMETERS HAVE BEEN LOADED. ALONG WITH THE 
PROGRAM. PRIOR TO THE ISSUANCE OF THIS COMMAND. 


RETURN TO PROGRAM (CON) - THE RETURN TO PROGRAM COMMAND ALLOWS THE 
FXECUTION OF THE DIAGNOSTIC PROGRAM TO RESUME AT THE FIRST INSTRUCTION 
FOLLOWING THE CURRENT SUPERVISOR CALL. HOWEVER, IF DESIRED, NEW FLAG 
CONDITIONS MAY BE SPECIFIED. 


RETURN TO SUPERVISOR (CONTROL A) - THE RETURN TO SUPERVISOR COMMAND 
INITIATES THE EXECUTION OF THE CLEANUP CODE. CONTAINED IN THE ACTIVE 
PROGRAM. AND PROVIDES AN EXIT TO THE SUPERVISOR COMMAND MODE. 
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14.0 LORDING 


SINCE THE EXERCISER 1S PART OF THE DPM SOFTWARE. IT 1S REQUESTED AND 
LOADED BY THE RSX-11M COMMAND “RUN DZKCH” WHERE “DZKCH” 1S THE PROGRAM 
RELEASED NAME. A PROMPT IS THEN ISSUED TO THE CONSOLE WHICH INITIATED 
THE PROGRAM. THE FOLLOWING IS A CONSOLE PRINTOUT OF AN EXAMPLE OF 
PROGRAM DIAGLOGUE. (NOTE: OPERATOR'S RESPONSE 1S UNDERLINED). 


RUN DZKCH 


* UNITS (0D) 7 8 


UNIT 1 
ENTER CONTROLLER NUMBER : (0) 0 ? 


ENTER TERMINALS ON THAT CONTROLLER : (D0) 1 ? 1-4 


UNIT 5 
ENTER CONTROLLER NUMBER : (0) 0 ? 1 


ENTER TERMINALS ON THAT CONTROLLER : (D) 4 ? 1,2,3.4 


UNIT 9 
ENTER CONTROLLER NUMBER: (0) 2 ? 


ENTER TERMINALS ON THAT CONTROLLER: (D) 8 ? 1.2,3-4 


NUMBER OF ENTERED TERMINALS= 12 
UNIT xx athe KX LOGICAL SB xx +“ Xk 
1 


nN 
canis 
Oo 


2 0 
3 0 
4 0 


1 1 


te 

on et of 49 O93 “J o -— tw 
=a 
£ 


wNe£- Ww 
Wh 

os 

oO 
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14.1 EXPLANATION OF PRINTOUT 


»"RUN DZKCH” CAUSES THE TASK TO BE REQUESTED, WHILE THE DIAGNOSTIC 
SUPERVISOR CONTROL PROGRAM -- REVISiON-A (DCP-A). REQUESTS THE 
OPERATOR TO TYPE “STA” TO START THE EXERCISER. EXAMPLE: DCP-ADSTA 


DESCRIPTION OF THE PRINTOUT 1S CONTINUED IN 15.0 


15.0 PROGRAM PARAMETER SELECTION 


THE PROGRAM AT STARTUP ENTERS A DIALOGUE WITH THE OPERATOR TO 
DETERMINE WHICH UNITS ON WHAT CONTROLLERS ARE TO BE EXERCISED. THE 
OPERATOR AT THIS POINT IS INTERROGATED WITH: 


"NUMBER UNITS (D)?” 


WHICH MEANS, ENTER THE TOTAL NUMBER OF DEVICES THE OPERATOR WANTS TO 
EXERCISE (UP TO 63). 


THE OPERATOR THEN ENTERS THE TOTAL NUMBER OF TERMINALS (ON THE SERIAL 
BUS SYSTEM) TO BE EXERCISED IN DECIMAL REPRESENTATION, FOLLOWED BY A 
CARRIAGE RETURN. NO DEFAULT IS PROVIDED. 


EXAMPLE: NUMBER UNITS (D)? 12 <CR> 


IN THE ABOVE EXAMPLE . THE OPERATOR WANTS A TOTAL OF TWELVE TERMINALS 
TO BE EXERCISED. 


15.1 SELECTED CONTROLLER 


THE PROGRAM CAN EXERCISE 8 CONTROLLERS (0 THRU 7), BUT THE LARGEST 
NUMBER OF CONTROLLERS PRESENTLY PLANNED FOR OPM SYSTEMS IS 4 (O THRU 
3). THE OPERATOR CAN SELECT ANY OF ONE. OR ALL FOUR CONTROLLERS(O 
THRU 3), IN ANY SEQUENCE ON THE SERIAL BUS. THE EXERCISER THEN BUILDS 
UP TO A 63 WORD TABLE FOR ALL SELECTED CONTROLLERS (MAX. OF 63 
DEVICES PER CONTROLLER). PLACING EACH IN THE HIGH BYTE OF AN UP TO 63 
WORD TABLE. ONE TASK CAN ©XERCISE UP TO 63 TERMINALS AT ONE TIME. IF 
A SYSTEM HAS MORE THAN 63 TERMINALS SPREAD OUT OVER MULTIPLE 
CONTROLLERS. MULTIPLE TASKS MUST BE RUN TO EXERCISE THOSE TERMINALS 
GREATER THAN 63. HOWEVER, EACH TASK MUST BE INITIATED FROM DIFFERENT 
CONSOLE TERMINALS. HERE THE OPERATOR IS INTERROGATED WITH: 
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UNIT 1 

"ENTER CONTROLLER NUMBER (0) O ?” 

OPERATOR'S RESPONSE IS TO TYPE IN THE CONTROLLER NUMBER TO BE 
EXERCISED, OR USE THE DEFAULT FOLLOWED BY A CARRIAGE RETURN. THE 
DEFAULT 1S CONTROLLER NUMBER O 

UNIT 1 

EXAMPLE: ENTER CONTROLLER NUMBER (0)? <CR> 

WHERE <CR> MEANS CARRIAGE RETURN. 


IN THE ABOVE EXAMPLE CONTROLLER NUMBER © HAS BEEN ENTERED TO THE 
PROGRAM. 


qe Coe — = 
em a ee 


15.2 SELECTED UNITS 


FOR A GIVEN SELECTED CONTROLLER, OR CONTROLLERS. TERMINALS ON THAT 
SPECIFIC CONTROLLER CAN BE ENTERED INDIVIDUALLY, SEQUENTIALLY.OR IN ANY 
ORDER, EACH SEPERATED BY A COMMA. THE OPERATOR IS ALSO GIVEN THE 
FLEXIBILITY OF ENTERING ALL 63 TERMINALS SIMULTANEOUSLY. THE SYSTEM 
1S THEN MAPPED, ONLINE TERMINALS EXERCISED. OFFLINE TERMINALS REPORTED 
AS BEING OFFLINE, AND NON-EXISTENT TERMINALS REPORTED AS NOT SYSGENED. 
(A BRIEF DESCRIPTION OF SYSGEN IS GIVEN IN 1.1 OF THE SYSTEM 
GENERATION MANUAL ). THE PROGRAM THEN EQUATES THOSE TERMINALS TO 
LOGICAL DEVICES. AS SYSGENED ON THE SYSTEM. STORES THEM IN THE SAME 
TABLE AS THE CONTROLLERS, WITH THE TERMINAL NUMBER IN THE LO-BYTE OF 
THE WORD. INTERROGATION HERE CONTINUES WITH: 


UNIT 1 
"ENTER TERMINALS ON THAT CONTROLLER (0D) 1? 1-4 " 


THE OPERATOR TYPES IN THE TERMINALS TO BE EXERCISED. ON THE SELECTED 
CONTROLLER (0). 1-4 MEANS 4 TERMINALS HAVE BEEN ENTERED ALL AT ONCE 
ON THE SELECTED CONTROLLER. 


UNITS KEEPS A SEQUENTIAL COUNT OF THE NUMBER OF DEVICES ENTERED. AND 
POINTS TO THE NEXT SEQUENTIAL DEVICE. 1T DOES NOT POINT TO THE 
PHYSICAL TERMINAL NUMBER. AT THIS POINT THE TOTAL 12 UNITS THE 
OPERATOR WANTED EXERCISED HAVE NOT BEEN ENTERED. THUS THE PROGRAN 
ASSUMES THE REMAINING DEVICES ARE ON DIFFERENT CONTROLLERS. AND SO 
CONTINUES WITH THE DIALOGUE. 


UNIT 5 
ENTER CONTROLLER NUMBER: (0) )? 1 


THE PROGRAM ASKS WHAT OTHER CONTROLLER IS TO BE UTILIZED. THE OPERATOR 
SPECIFIES CONTROLLER NUMBER 1. 


ENTER TERMINALS ON THAT CONTROLLER: (D0) 4? 1,2,3,4 
HERE THE PROGRAM INTERROGATES FOR TERMINALS TO BE ENTERED. AND THE 
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OPERATOR ENTERS 4 TERMINALS ON CONTROLLER 1 IN SEQUENTIAL ORDER. NOT 
HAVING ENTERED THE TOTAL NUMBER OF TERMINALS (12) PREVIOUSLY ASKED FOR 
wa THE PROGRAM AGAIN CONTINUES TO INTERROGATE THE 


UNIT 9 
ENTER CONTROLLER NUMBER: (0317 2 
THE OPERATOR ENTERS CONTROLLE2 NUMBER 2 TO THE PROGRAM 


ENTER TERMINALS ON THAT CONTROLLER: (D0) 8? 1,2,3-4 


AFTER THE PROGRAM PSKS FOR THE REMAINING 4% TERMINALS. THE OPERATOR 
ENTERS THEM IN SEQUENTIAL AND SIMULTANEOUS COMBINATIONS. 


IN THE ABOVE EXAMPLE’ TERMINALS 1.2 ON THE PREVIOUSLY ENTERED 
CONTROLLER 1.€ (CONTROLLER 2) IS ENTERED TO THE PROGRAM TO BE 
EXERCISED, TERMINALS 3 AND 4 1S ALSO ENTERED, BUT AS 3 THROUGH 4, 
ALLOWING FOR TYPING FLEXIBILITY. HAVING COUNTED THE TOTAL UNITS 
ENTERED TO BE EXERCISED, IMMEDIATELY THE OPERATOR 1S INFORMED OF THE 
NUMBER OF TERMINALS ENTERED. IN THE FOLLOWING FORMAT: 


EXAMPLE: NUMBER OF ENTERED TERMINALS = 12 
WHERE 12 1S THE TOTAL NUMBER OF LEGAL DEVICES ENTERED TO THE PROGRAN. 


— AKXCONTROLLERKX X¥LOGICAL SBKX XXLUNXX 
S| 

xX YY 22 % 
WHERE XX |S THE PHYSICAL TERMINAL ENTERED ON CONTROLLER YY, 22 1S THE 


LOGICAL SB UNIT NUMBER ASSIGNED TO EACH TERMINAL BY RSX DURING SYSGEN, 
AND % |S THE LOGICAL UNIT NUMBER THE PROGRAM ASSIGNS TO EACH UNIT Xx. 


15.3 OPERATOR INTERFACE DIALOGUE 
OTHER EXAMPLES OF OPERATOR AND PROGRAM DIALOGUE ARE LISTED BELOW. 


THE OPERATOR CAN TYPE IN ALL 63 TERM!NALS SIMULTANEOUSLY AS FOLLOWS: 
>RUN DZKCH 

DCP-A> STA 

UNITS (D) ? 63 <CR> 

UNIT 1 

ENTER CONTROLLER NUMBER: (0) ? <CP> 

EXAMPLE: “ENTER TERMINALS ON THAT CONTROLLER (1)7"1-63 <CRD 

IN THE ABOVE EXAMPLE. ALL 63 TERMINALS ARE ENTERED INTO A 63 WORD 


TABLE, AND THE PROGRAM EXERCISES ALL 63 DEVICES IF THEY ARE ALL ON 
LINE. tT 1S TO BE NOTED THAT ONLY ONE CONTROLLER NUMBER(O THRU 7)AND 


sess ——— -_ 7 


SEQ 0012 





eee 


N 1 
Page 13 


UP TO 63 DEVICES ON ANY ONE CONTROLLER. CAN BE ENTERED AT ANY TIME. 
WHICH LIMITS THE PROGRAM TO EXERCISE A MAXIMUM OF 63 TERMINALS. 
ANOTHER EXAMPLE 1S GIVEN BELOW: 

IF THE OPERATOR HAS 63 UNITS ON THE DPM SYSTEM. BUT 15 DEVICES ARE ON 
CONTROLLER OQ, 15 ON CONTROLLER 1, 15 ON CONTROLLER 2, AND 18 DEVICES 
ARE ON CONTROLLER 3 (A TOTAL OF 63 DEVICES), AND ALL DEVICES ARE TO BE 
EXERCISED. THEN THE DIALOGUE 1S AS FOLLOUS: 

RUN DZKCH 

DCP-A>STA 

NUMBER UNITS (0)7?: 63 


ENTER CONTROLLER NUMBER (0)?: 0 


UNIT 1 

ENTER TERMINALS ON THAT CONTROLLER (1)7?: 1-15 

AT THIS POINT THE TOTAL 63 UNITS THE OPERATOR WANTED EXERCISED, HAVE 
NOT BEEN ENTERED, THUS THE PROGRAM ASSUMES THE REMAINING DEVICES ARE 
ON DIFFERENT CONTROLLERS, AND SO CONTINUES THE DIALOGUE: 

ENTER CONTROLLER NUMBER (0)?: 1 


UNIT 16 
ENTER TERMINALS ON THAT CONTROLLER (1)7: 16-30 


ENTER CONTROLLER NUMBER (1)7: 2 


UNIT 31 
ENTER TERMINALS ON THAT CONTROLLER (1)?: 31-45 
ENTER CONTROLLER NUMBER (2)7: 3 


UNIT 46 
ENTER TERMINALS ON THAT CONTROLLER (1)?: 46-63 


(WHERE UNITS KEEPS COUNT OF THE NUMBER OF DEVICES ENTERED. AND THE 
NUMBER IN THE BRACKETS ARE DEFAULTED DEVICE NUMBERS). 


THE OPERATOR 1S THEN INFORMED OF THE TOTAL NUMBER OF ENTERED TERMINALS 
AS EXPLAINED BEFORE IN THE FOLLOWING FORMAT: 


NUMBER OF ENTERED TERMINALS = 63 


ETC. 
AND THE PROGRAM GOES ON TO EXERCISE ALL 63 TERMINALS. 


FOR TERMINALS THAT CANNOT BE ASSIGNED. OR ATTACHED. THE OPERATOR WILL 
BE INFORMED WITH: 


“TERMINAL X CANNOT BE ASSIGNED-SOSW=Y" 
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“TERMINAL X CANNOT BE ATTACHED-SDSW=Y" 


WHERE THE ERROR CODES Y ARE RETURNED BY DIRECTIVES IN THE DIRECTIVE 
STATUS WORD ($DSW). FOR ADDITIONAL INFORMATION. REFER TO THE RSX-11M 
EXECUTIVE REFERENCE MANUAL, OR RSX-11M POCKET REFERENCE. 


FOR NON-EXISTENT SYSGENED CONTROLLERS AND/OR TERMINALS. THE OPERATOR 
WILL BE INFORMED WITH: 


“CONTROLLER X, TERMINAL Y 1S NOT SYSGENED IN” 
PROGRAM 1S ABORTED 


16.0 SWITCH REGISTER FUNCTIONS 


NO EXPLICIT SWITCH REGISTER SETTINGS WILL BE RECOGNIZED BY THE 
PROGRAM, SO AS TO FACILITATE INTEGRATION UNDER RSX11. 


17,0 ERROR REPORTING 


ESSENTIALLY THERE ARE 7 TYPES OF ERRORS SENSED AND REPORTED, 4 OF 
WHICH ARE DEFINED AS MPJOR. EACH OF THE 4 IS PRECEEDED BY A 
DIAGNOSTIC SUPERVISOR ERROR HEADER IN THE FOLLOWING FORMAT: 


DZKCH HRD ERR 00001 TST 001 SUB 000 PC: 015346 


THIS LINE MEANS THAT PROGRAM DZKCH HAS DETECTED A HARD ERROR. NUMBERED 
1, ON TEST NUMBER 1, SUBTEST NUMBER 0 (1.E,. NO SUBTEST). AND THE PC iS 
POINTING TO LOCATION 015346. 


ERRORS RETURNED BY RSX-11M 170 STATUS ERROR CODES ARE GIVEN BELOW. 
PARTIAL MNEMONICS ARE LISTED; THE COMPLETE MNEMONIC {S IE. XXX. THE 
OCTAL ERROR NUMBER LISTED IS THE LOW-ORDER BYTE OF THE COMPLETE WORD 
VALUE (2'°S COMPLEMENT OF THE DECIMAL NUMBER). 


ERROR NUMBER 


MNEM. DEC. OCTAL SIGNIFICANCE 

. BAD «4 377 BAD PARAMETERS 

_ IFC ae 376 INVALID FUNCTION CODE 

. DNR eg 375 DEVICE NOT READY 

. VER » = 374 PARITY ERROR ON DEVICE 

. ONP - § 373 HARDWARE OPTION NOT PRESENT 
. SPC * % 372 ILLEGAL USER BUFFER 

. DNA “¢ 371 DEVICE NOT ATTACHED 

. DAA 2 370 DEVICE ALREADY ATTACHED 

. DUN = 367 DEVICE NOT ATTACHABLE 

. EOF -10 366 END-OF-FILE DETECTED 

. FOV “11 365 END-OF-VOLUME DETECTED 

_ WLK -e 364 WRITE ATTEMPTED TO LOCK UNIT 
. DAG +33 363 DATA OVERRUN 


a ee ee 


SEQ 0014 


ED CRE AD Ao OR 


SENO/RECEIVE FAILURE 

REQUEST TERMINATED 

PRIVILEGE VIOLATION 

SHAREABLE RESOURCE IN USE 
ILLEGAL OVERLAY REQUEST 

ODD BYTE COUNT (OR VIRTUAL 
ADDRESS) 

LOGICAL BLOCK NUMBER TOO LARGE 
INVALID UDC MODULE NUMBER 

UDC CONNECT ERROR 

SYSTEM DYNAMIC MEMORY EXHAUSTED 
DEVICE FULL 

INDEX FILE FULL 

NO SUCH FILE 

LOCKED FROM READ/WRITE ACCESS 
FILE HERDER FULL 

ACCESSED FOR WRITE 

FILE HERDER CHECKSUM FAILURE 
ATTRIBUTE CONTROL LIST FORMAT ERROR 
FILE PROCESSOR DEVICE READ ERROR 
FILE PROCESSOR DEVICE WRITE ERROR 
FILE ALREADY ACCESSED ON LUN 
FILE 1D, FILE NUMBER CHECK 

FILE 1D, SEQUENCE NUMBER CHECK 
NO FILE ACCESSED ON LUN 

FILE WAS NOT PROPERLY CLOSED 

NO BUFFER SPACE AVAILABLE FOR FILE 
ILLEGAL RECORD SIZE 

FILE EXCEEDS SPACE ALLOCATED, NO 
BLOCKS 

ILLEGAL OPERATION ON FILE 
DESCRIPTOR BLOCK 

BAD RECORD TYPE 

iLLEGAL RECORD ACCESS BITS SET 
ILLEGAL RECORD ATTRIBUTES BITS SET 
ILLEGAL RECORD NUMBER - TOO LARGE 
(NOT USED) 

RENAME - 2 DIFFERENT DEVICES 
RENAME - A NEW FILE NAME 

ALREADY IN USE 

BAD DIRECTORY FILE 

CANNOT RENAME OLD FILE SYSTEM 
BAD DIRECTORY SYNTAX 

FILE ALREADY OPEN 

BAD FILE NAME 

BAD DEVICE NAME 

BAD BLOCK ON DEVICE 

ENTER - DUPLICATE ENTRY IN 
DIRECTORY 

NOT ENOUGH STACK SPACE (FCS 

OR FCP) 

FATAL HARDWARE ERROR ON DEVICE 
FILE 1D WAS NOT SPECIFIED 
ILLEGAL SEQUENTIAL OPERATION 
END-OF-TAPE DETECTED 


ae 
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SEQ 0015 


oo renner nee a ee a ee 





Sn Pe aoe nse 0 2 


Page 16 

_ BUR -63 301 BAD VERSION NUMBER 

. BHO -64 300 BAD FILE HEADER 

_OFL -65 277 DEVICE OFFLINE 

. BCC ~66 276 BLOCK CHECK OR CRC ERROR 

-67 (NOT USED) 

. NNN -68 274 NO SUCH NODE 

_NFW -69 273 PATH LOST TO PARTNER 

. BLB -70 272 BAD LOGICAL BUFFER 

_ TMM «71 271 TOO MANY OUTSTANDING MESSAGES 

_ NOR -72 270 NO DYNAMIC SPACE AVAILABLE 

_ CNR “73 267 CONNECTION REJECTED 

. TNO -74 266 TIME OUT ON REQUEST 

_ EXP -75 265 FILE EXPIRATION DATE NOT REACHED 

_ BTF -76 264 BAD TAPE FORMAT 

. NNC v7 263 NOT ANS! “D” FORMAT BYTE COUNT 

_ NNL -78 262 NOT A NETWORK LUN 

_ NLK -79 261 TASK NOT LINKED TO SPECIFIED ICSZICR 
INTERRUPTS 

_NST -80 260 SPECIFIED TASK NOT INSTALLED 

.FLN -81 257 DEVICE OFFLINE WHEN OFFLINE PEQUEST 
WAS ISSUED 

. ES -82 256 INVALID ESCAPE SEQUENCE 

.PES -§3 255 PARTIAL ESCAPE SEQUENCE 

. ALC -84 254 ALLOCATION FAILURE 

. ULK -85 253 UNLOCK ERROR 

FOR ADDITIONAL INFORMATION KEFER TO THE IAS/RSX-11M 

i70 OPERATIONS REFERENCE MANUAL 

17.1 MAJOR ERRORS 

(1) NO RESPONSE FROM A TERMINAL - THIS ERROR RESULTS IN THE 


FOLLOWING MESSAGE: 


“TIME-OUT ERROR: TERMINAL X IS OFFLINE" 
“ERROR-TYPE=8, SB=1-63,RSX-11M STATUS CODE=277.B8YTE COUNT=0-128 


THE FOLLOWING EXPLAINS THE VARIOUS PARAMETERS IN THE ERROR STATEMENTS. 
“ERROR-TYPE”: 
THE PROGRAM ASSIGN'S A NUMBER TO EVERY ERROR SENSED. 
AND ARE DEFINED AS FOLLOWS: 
A) ERROR-TYPE=1 >RSX-11M DETECTED ERROR. 
B) ERROR-TYPE=2 >RETRY ERROR. 
C) ERROR-TYPE=3 *RSX-11M DIRECTIVE STATUS WORD ERROR. 
D) ERROR-TYPE=4 *DATA COMPARISON ERROR. 


ee LA A a ae - 


SEQ 0016 | 


ee —————— nil 
~ 
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Es) ERROR-TYPE=5 ERROR CODE FOR GN ONLINE TERMINAL. 
F) ERROR-TYPE=6 -CRC ERROR CODE. 
G) ERROR-TYPE=8 + TIME-OUT: TERMINAL OFFLINE ERROR. 


THESE ARE THE SERIAL BUS UNIT NUMBERS, WHICH ARE FROM 1 TO 63. 

"RSX-11M STATUS CODE” 

APPENDIX | OF THE 1/0 OPERATIONS MANUAL LISTS THE 1/0 ERROR CODES 
RETURNED BY THE SYSTEM. THEY CAN ALSO BE FOUND IN SECTION 17.0 ABOVE. 


"BYTE -COUNT” 
THIS KEEPS THE NUMBER OF BYTES TRANSFERRED WHEN THE ERROR OCCURED. 


FOR ANY TERMINAL GOING OFFLINE, AND UPON RETURNING ONLINE, THE 
OPERATOR WILL BE INFORMED WITH THE MESSAGE: 


“TERMINAL X IS BACK ON LINE. " 


(2) OPERATING SYSTEM ERRORS - FOR ERRORS RELATING TO THE OPERATING 
SYSTEM, THE OPERATOR WIL! GE INFORMED WITH THE MESSAGE: 


"RSX-11M HARD ERROR DETECTED: " 
“"ERROR-TYPE=1, S6=1-63,RSX-11M STATUS CODE=0-377,BYTE COUNT=0-128" 


(3) BAD DATA IN RECEIVED DATA MESSAGE - THIS ERROR WILL RESULT IN 
THE MESSAGE: 


"DATA COMPARISON ERROR: " 
“"ERROR-TYPE=4, SB=1-63,BYTE COUNT RECEIVED=0-128" 


BYTE-NUMBER GO DATA BD DATA 
WW YY ZZ 
WW YY ZZ 


WHERE WW IS THE BAD DATA POSITION IN THE DATA STREAM. YY IS THE 
TRANSMITTED DATA, AND 2Z IS THE RECEIVED DATA. 


(4) TRANSMISSION FAILURE IN TRANSMIT/RECEIVE MESSAGE - THIS ERROR 
WILL RESULT IN THE MESSAGE: 


"RETRY ERROR: " 
"ERROR-TYPE=2, SB=1-63, BYTE COUNT=0-128 


‘ 
: 


SEQ 0017 | 


17.2 MINOR ERRORS 


ERPOR-TYPE 3, ERROR-TYPE 5S ARE CONSIDERED MiNOR ERRORS. 


18.0 TEST DESCRIPTION 


GENERAL AFTER INITIAL DIALOGUE 1S PERFORMED AND A TABLE OF ACTIVE 
r. 0. € TERMINALS CONSTRUCTED THE BASIC SEQUENCE OF THE EXERCISER IS 
AS FOLLOWS: 

SELECT A DATA PATTERN 

SELECT A MESSAGE LENGTH 

TRANSMIT DATA MESSAGE TO ALL TERMINALS IN THE TABLE 

ON POLL CYCLE N 

RECEIVE DATA MESSAGES FROM ALL SELECTED 

TERMINALS IN POLL CYCLE N+1. 

REPORT ANY ERRORS DETECTED IN THE FORMATS INDICATED 

IN SECTION 6. 0. 

UPDATE DATA PATTERN IN OUTPUT BUFFER 

+ alias «Sapna LENGTH. 


18.1 DATA PATTERNS 


THERE ARE 7 DIFFERENT DATA PATTERNS AND THEY ARE UTILIZED AS FOLLOWS. 


ALL ONES- THIS DATA PATTERN CHECKS THE ABILITY OF THE SERIAL 
BUS SYSTEM TO IMPLEMENT ZERO STUFFING AND ALSO CHECK 
BiT DROPOUT. 


ALL ZEROS - THIS DATA PATTERN IS USED TO DETECT ANY BIT PICKUP 
TENDENCIES. 


ONES ZEROS - THIS COMBINATION OF ONES AND ZEROS DATA PATTERN IS 
eng ; Me GENERALLY TEST THE SYSTEM RECOVERY 
BILITIES. 


FLOATING ZERO - THIS DATA PATTERNS (FLOATING TWO ZEROS FROM LOWEST 
SIGNIFICANT POSITIONS TO HIGHEST POSITIONS) {5 
UTILIZED TO DETECT BYTE BOUNDARY FAILURES DUE TO 
LINE NOISE AND HARDWARE FAILURES. 


SEQ 0018 


EO He 
me eae eae 


ee NN ee ee 


ES | sss 
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\6.2 MESSAGE LENGTHS 


EACH DATA PATTERN 1S TRANSMITTED. ON ALTERNATE POLL CYCLES (TRANSNIT. 
RECEIVE, TRANSMIT, ETC), IN MESSAGES OF DECLINING MESSAGE LENGTHS. 
ALL DATA PATTERNS BEGINS WITH A LENGTH OF 128 BYTES. THEN 64,32, ETC, 
ETC, UNTIL A MESSAGE OF 2 DATA BYTES 1S TRANSMITTED. THEN ANOTHER 
PATTERN 1S SELECTED AND THE MESSAGE COUNT AGAIN REVERTS TO 128. AT 
PRESENT TIME ALL DEVICES HANDLES THE MAXIMUM MESSAGE LENGTHS OF 128 
BYTES. FOR FUTURE EQUIPMENTS. MESSAGE LENGTHS MIGHT HAVE TO BE 
DETERMINED BY POLLING ALL DEVICES TO DETERMINE TYPES AND SETTING THE 
MAXIMUM MESSAGE LENGTHS EQUAL TO THE SMALLEST BUFFER SIZE. 


18.3 END OF PASS REPORT 


AN END OF PASS REPORT IS GIVEN EVERY MINUTE IN THE FOLLOWING FORMAT: 
ACTIVE PASSES SINCE LAST REPORT=X.ACTIVE TERMiINAL=Y, TIME=00: 00 


UPON RECEIVING THE DCP-A> PROMPT, THIS PRINTOUT CAN BE INHIBITED BY 
TYPING IN THE FOLLOWING: 


DCP-A>STA/FLA: I XE 


19.0 PROGRAM TERMINATION 

THIS PROGRAM WILL CYCLE UNTIL A CONTROL C IS TYPED UPON THE CONSOLE 
WHICH INITIATED THE EXECRCISOR. AT THAT TIME THE PROGRAM WILL ABORT 
AND EXIT TO THE MONITOR. 

EXAMPLE: CONTROL C¢ 


MCR> 


sett 


SEQ 0019 


—_ awe oe ee —— 


—— —-— eee 





O2ZKCH MACRO M11 10-OCT-77 10: 16 
TABLE OF CONTENTS 


25-1164 


DIAGNOSTIIC SUPERVISOR HEADER 
EQUATES 


P-TABLE MESSAGES 

GENERAL AND DPB STORAGE LOCATIONS 
HARDWARE P-TABLE 

DEFAULT HARDWARE P-TABLE 

SOFTWARE P-TABLE 

DISPATCH TABLE 

INIT CODE 

MAIN ROUTINE 


DECLARE A SIGNIFICANT EVENT PER 5 MINS. 


SET BYTE PATTERN IN OUTPUT BUFFER 
GET NEXT DEVICE AND LUN INFORMATION 
POLL AND SET OUTPUT BUFFERS 

CHECK ERRORS-CHECK FOR BAD CRC 
CLEANUP CODE 

CRC-AST ROUTINE 

AST SERVICE ROUTINE 

PRINT MODULE 


SEG 0020 — 
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SEQ 0021 

1 .TITLE O2ZKCH 

ys .ENABL ANA 

3 .NLIST MO. ME 

4 .LIST MEB 

5 .MCALL SVC 

6 .MCALL ASTXSS, Q10S, ALUNS. DIRS, GLUNS, EX! TSS 

7 .MCALL MRKTSS, CHKTSS, GTIMSS 

8 .MCALL WTSESS 

9 .GLOBL STADR 
10 000000 SVC 
11 000001 SVCINS= 1 *LIST GENERATED SYMBOLS 
12 000001 SUCTST= 1 -LIST TEST NUMBERS 
13 000001 SVCSUB= 1 *LIST SUBTEST NUMBERS 
14 000001 SVCGBL= 1 -LIST BLOBALS 
15 000001 SVCTAG= 1 *LIST GENERATED TAGS 


ee, ee eo 


OZKCH 


MACRO M11 
DIAGMOSTIIC SUPERVISOR HEADER 


000000 


000000 
000000 
000000 
000001 
000002 
000003 
000004 
000005 
000006 
000007 
000010 
000010 
000911 
000011 
000012 
000012 
000013 
000014 
000014 
000016 
000016 
000020 
000020 


060 


001 
004 


000000 
000063 
000300 
000001 


O0U000 
000000 


000000 
000000 
000090 
090000 
007326' 
007330' 
013262" 
007266 ' 
000000 
000210" 
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ae Ss Sey Se Sa Qa 


STADR: 


LSNANME: : 


LSREV: : 
LSDEPO: : 
LSMREV: : 


LSUNIT: : 
LSTIM1: : 
LSTIMU: - 
LSOTIML: : 


LSEF: : 


LSSPC: : 
LSEXP1: : 
LSEXP 2: : 
LSEXPS: : 
LSDTP: : 
LSICP: : 
LSCCP: : 
LSHPCP: : 
LSSPCP: : 
LSDEVP: : 


.SBTTL DIAGNOSTIIC SUPERVISOR HEADER 


KAAAAAAAAAAAAAA AAA AAA AAA AA AAA AAA AAA AKA 
THIS SECTION CONTAINS GENERAL INFO WHICH 
DESCRIBES THE MAJOR CHARACTERISTICS OF 


THE DIAGNOSTIC PROGRAM 


KEXEXAAAAAAAAAKAAA AKA AAA AAA AAA A AAA KEKE 


POINTER NONE 


HEADER D2KCH. A. 0.63, 300, 1 


a00 


CSREVISION 
CSEDIT 


0 
63 


L$D01SPATCH 
LSINIT 
LSCLEAN 

L SHARD 

0 

LSODVTYP 


me eee ae eee 


SEQ 0022 


| 
| 
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DIAGNOSTIIC SUPERVISOR HEADER SEQ 0023 


000054 LSREPP.: - 

000054 000000 .WORD OQ 
000056 LSHPTP: - 

000056 007314’ . WORD LSHW 
0006 LSSPTP: : 

000060 o00000 . WORD 0 

000062 LSORCT: - 

000062 000202’ WORD LSDR 

000064 LSORS: : 

000064 000206' WORD LSORST 

000066 LSSTA: : 

000066 9000000 WORD 0 

000070 LSAUT: : 

000070 9000000 WORD 0 

000072 LSDUT: : 

000072 000000 . WORD 0 

000074 LSPWRU: : 

000074 900000 . WORD 0 

000076 LSLADP: : 

900076 015444’ _ WORD LSLAST 


TT 
a ae ee ee 


sss esses —_—- ———— 
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EQUATES SEQ 0024 


u3 : .SBTTL EQUATES 
4S ; KEAAAAAAAAA AAA AAA AA AAA AAA AA AAA AAA A AAA AAA AAA KKE 
46 ; THIS FACILITATES PROGRAM ASSEMBLY BY EQUATING 
47 ; SPECIFIC SYMBOLS WITH SPECIFIC VALUES VIA DIRECT 
48 ; ASSIGNMENT STATEMENTS. 
; KARAEAAAAAAA AAA AAA AA AAA AAAA AAA AA AAA AAA AAA AKA 
51 000003 DATA =3 +BYTE POSITION IN OUTPUT BUFFER 
Ys 000011 LUN =11 *DEF INE LOGICAL UNIT NUMBER FROM 11 
= +OFFSETS IN DEVICE PARAMETER BLOCK (DCB) 
56 000002 10. FUN= 2 
57 000004 10. LUN= 4 
58 000006 10. EFN= 6 
59 000010 10. 1ST= 10 
60 000012 10. AST= 12 
61 000014 10.Ail= 14 
62 000016 10.AZ= 16 
63 000020 10.A3= 20 
64 000022 10.A4= 22 
- 000024 10. A5= 24 
6 
67 + RSX 170 FUNCTION CODES 
68 
69 002400 10. WPC= 2400 *WRITE PERIPHERAL BLOCK 
70 003400 10. RXP= 3400 *WRITE TRANSPARENT WITH LOOP BACK 


OZKCH 
EQUATES 


MACRO M11 


100000 
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ooo 
v 


WWBWDOVOODNBDMDOOOwOOOD 
Nt a a a a a tt at at 
oooo0o0eo 


o> bem oe ooh oo fe 


100000 


ee -- ———— 5 | 


SEQ 0025 


D2KCH 


99 


100 
101 


MACRO M11 
P-THELE MESSAGES 


000100 
000103 
000106 
000111 
000114 
000117 
000122 
000125 
000130 
000132 
009135 
000140 
000143 
000146 
000151 
000154 
000157 
000162 
060165 
000170 
000173 
000176 
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Xs Bs Ge Ws We 


GETCNT: 


GETERNM: 


. EVEN 


. SBTTL P-TABLE MESSAGES 


AESAARAAAAAAAAAAAAAAAAAAAAA AAA AAA AAA AA AKS 
++NOTE++ P-TABLE MESSAGES ARE USED DURING 
DIALOGUE WITH THE OPERATOR. 
XSAAAAAAAAAAAKAAA AAA AAA AAA AAA AAA AAA A AAA AAT 


. ASCIZ7ENTER CONTROLLER NUMBER : 7 


. ASCIZ7ENTER TERMINALS ON THAT CONTROLLER : / 


sn cg ~— 7 


—— mm me 


—_ ac ee ee me — 


SEQ 0026 


DZKCH 
GENERAL 


MACRO M11 


000200 
000200 
000202 
000202 
000204 
000206 


000210 
000210 
000210 


000214 
000214 
000216 
000220 
000222 


000001 


000001 
000001 


000000 


a 
B 3 
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AND OPB STORAGE LOCATIONS 


Be Be Be Be Be Ws Be Ws 


DEVTYPE 


. SBTTL GENERAL AND DPB STORAGE LOCATIONS 


AEXKAAAAAAAA AAA AAA AA AAA AAA AAA ALAA AAA AAA AK AKA 
THIS SECTION OF THE SOFTWARE CONTAINS ALL 
DIRECTIVE PARAMETER BLOCKS AS USED BY RSX-11N. 
ALSO CONTAINS PERMANENT/TEMPORARY STORAGE. 
KEXAAAAAAAA KAKA AAA AAA AKA AAA AAA AA AAA KAKA KAKA AK 


1,1 


.WORD 1 
.WORD 1 
.WORD 1 


.BLKW 1 
KAXKAAA AKA AAA AAA KAKA AAA AAA AKA AAA AAA AA KAA EK 
THE DEVREG CALL ASSEMBLES A PAIR OF TABLES 
WHICH ARE USED TO DEFINE THOSE DEVICE REGISTERS 
THAT WILL BE USED BY THE PROGRAM. 
St eee en eAnSS PRDRAERES TEN AO TONS IEOEEESES 


LSDVTYP: : 


oe Vs De We We We 


, 
; 
7 
; 
, 
, 


Q10DPB: 


.ASCIZ a@SBa 
. EVEN 


KEKKKAAAAAAARA AAR AKA RAAAAAAAAA AAA AAA AKA KAKA AKKK 
THE DEVTYP CALL SPECIFIES THE EQUIPMENT THAT 
THE EXERCISER PROGRAM WILL SERVE. 

KKAAKAAKAAAA AAA AAA AAA AAA AAA AA AAA AAA AAA AEE KK 


KKK AAAR AAA AAA AAA AAA AAA AAA AA AAA AAA AAA AKA 
THE QUED 170 DIRECTIVE PARAMETER BLOCK IS SET 
UP AS FOLLOWS....... 

KKAKARAA KAKA AAA AA AAA AKA AA AAA AAA AAA AAA AAA KKK 


Q10$ 10. FUN. LUN... !OST, AST, <SCBADR, SCBCNT, 40, PCBADR. PCBCNT> 
. BYTE e12Z, 
-WORD 10. FUN 

WORD UN 

BYTE , 

WORD JOST 
-WORD AST 
.WORD SCBADR 
-WORD = ScBCNT 

WORD 4 
.WORD PCBADR 
.WORD PCBCNT 

WORD 


AAXAAAAAA AAA AAA KAKA A AAA AAA AAA AAA AAA KAA AREAS 
THE ASSISN LOGICAL UNIT PARAMETER BLOCK IS 
DEFINED AS FOLLOWS......... 

XAEKAAAAAAA AAA AA AAA AAA KAKA A AAA AAA AAA KARATE 


<<< ese 


eee 


ae 


SEQ 0027 





OZKCH 
GENERAL 


MACRO M11 
139 000244 
000244 007 
000246 000011 
000250 123 
000252 000000 
140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 000254 
000254 005 
000256 000011 
000260 000262’ 
151 
152 
153 
154 
155 
156 
157 
158 000262 
159 000276 
160 000302 000000 
161 000304 9oN0000 
162 000306 
163 OGO506 
164 000706 
165 
166 
167 
168 
169 
170 
171 001006 000000 
172 001010 006000 
173 001012 9000000 
174 001014 900090 
175 
176 
177 
178 
179 001016 001041" 
180 001020 001245' 
181 001022 001451' 
182 001024 001655' 
183 001026 002061' 
184 001030 002265' 
185 001032 002471' 
186 001034 002675' 
187 001036 9000000 


eee ee 


004 
102 


003 
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AND DPB STORAGE LOCATIONS 


ALUDPB: 


&» Be We Be We Bs 


, 


, 


GLUDPB: 


, 
? 
¢ 
, 


ERRBRT: 


10ST: 


DEVPTR: 
NUMDE V. 


UNTBL: 


DEVTAB: 
OF FL IN: 


SCBADR: 
SCBCNT: 
PCBADR: 
PCBCNT: 


, 


OBUFF. 


ALUNS 
. BYTE 
. WORD 


. ASCII 


. WORD 


ee *DIRECTIVE PARAMETER BLOCK FOR ALUN. 


LUN 
7SB/ 
0 


KAAAAAAA AAA AK AA AAA AAA AAA AA AAA AA AAT KAKA KKK 
THE GET LUN PARAMETER BLOCK IS DEFINED AS 


FOLLOW 


OWS 
KKKKK AAA AAA AAA KAKA AAA AK KAKA AKA 


—— *+PARAMETER BLOCK FOR GLUN 


11 
ERRBRT 


AEKAK ARK A KAKA KAKA AAA AAA AAA AAA AAA AAA AAA KAKA 


STORAGE LOCATIONS 


2 9S 9% 9% OD 9 29 99 09999999905 955955555055 600006 


. BLKW 
. BLKW 
0 
0 
. BLKW 


. BLKW 
. BLKB 


6 *GLUN . BROADCAST ERROR BUFFER 

Z *WORDS FOR STATUS RETURN CODES. 
*POINTER TO NEXT TERMINAL. LUN 
*NUMBER OF ACTIVE TERMINALS 


64. *RUNTIME DEVICE UNIT TABLES 
64. *ACTIVE LUN.,DEV TABLE 
64. >OFFLINE TABLE 


RSX-11M DEVICE DEPENDENT PARAMETERS. .. 


. WORD 
. WORD 
. WORD 
. WORD 


ooooe 


STORAGE FOR OUTPUT BUFFERS. .. 


OBUF O 

OBUF 1 

OBUF 2 

OBUF 3 

OBUF4 

OBUFS 

OBUF6 

OBUF 7 

0 *END OF BUFFER TABLE 


SEQ 0028 


DZKCH 
GENER AL 


244 
245 


MACRO M11 


001044 
001245 
001451 
001655 
002061 
002265 
002471 
002675 


003102 
003104 
003106 
003110 
003112 
002114 
003116 
003120 


003122 
003322 
003522 
003722 
004122 
004322 
004522 
004722 


005122 
005124 
005126 
005130 
005132 
005134 
005136 
005140 


005142 


005206 


003122’ 
003322" 
003522' 
003722’ 
004122’ 
004322" 
004522' 
C04722' 


005142" 
005146' 
005152' 
005156' 
005162' 
005166' 
005172" 
005176' 


000000 
000000 


. ODD 
OBUF 0: 
OBUF 1: 
OBUF 2: 
OBUF 3: 
OBUF 4: 
OBUF 5: 
OBUF 6: 
OBUF 7: 
. EVEN 


‘ 


INBUFF: 


1 BUF OQ: 
{BUF 1: 
| BUF 2: 
IBUF 3: 
IBUFY: 
IBUFS: 
1 BUF 6: 
| BUF 7: 


1OSB: 


ISTATO: . 
ISTAT1: . 
ISTAT2: . 
ISTATS: . 
ISTAT4Y: . 
ISTATS: . 
ISTAT6: . 
ISTAT?: . 


1SB: 
1 ODSH: 
BUF : 


STORAGE 


. WORD 
. WORD 


a ee 
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AND OPB STORAGE LOCATIONS 


FOR INPUT BUFFERS 


1\BUFC 
IBUF 1 
1BUF2 
IBUF 3 
IBUFY 


FOR 1/0 STATUS BLOCK 


ISTATO 
ISTAT1 
ISTATZ 
ISTATS 
ISTATY 
ISTATS 
ISTAT6 
ISTAT?7 


—OO NMNMMMPINM | 


i=] 


a — 


*TEMP LOCATION USED IN AST 
> TEMPORARY LOCATION FOR DSW ERROR 
+TIME PARAMETER BUFFER 


oo 


SEQ 0029 


O2ZKCKi 
GENERAL 


MACRO M11 


005226 


000000 
000000 
00C000 
000000 
000000 
000000 


000000 
000000 


000000 
000000 


tsetse 
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AND DPB STORAGE LOCATIONS 


PATTRN: . 


- . WORD 
WORD 


OOOGDM9O9O0O0O00O9D00CCOOC0CO0-000000 


SEQ 0030 


*DATA PATTERN TERMINATOR 


PROGRAM PASS INDICATOR 
+MESSAGE LENGTH LOCATION 
*POINTER TO CURRENT BUFFER PAIR 
+LUN # TEMP LOCATION 
PROGRAM PASS INDICATOR 
*NUMBER OF ACTIVE TERMINALS 
ERROR TABLE LOCATIONS 

+ TERMINAL NUMBER LOCATION 
*ERROR POINTER OFFSET 
*PATTERN POINTER 

* TEMPORARY LOCATION IN CRC MODULE 

*THE FOLLOWING 12 LOCATIONS ARE TEMPORARY 


ee ree eee se 


»LOCATION FOR LOGICAL SB DEVICES 


| 
;QUTPUT BUFFER POINTER 


CRC COMPLETE FLAG 


OZ2*CH 


MACRO M11 


HARUMARE P-TABLE 


298 


299 


300 


007264 
007264 
007266 
007266 
007266 
007270 
007272 
007274 
007276 
007300 
007300 
007302 
007304 
007306 
007310 


007312 
007312 


000012 


000032 
000100' 
177400 
CO0000 
000007 


000052 
000132' 
000377 
000001 
000077 
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er» Be Be Be Bs We Be We 


BGNHRD 


LSHARD: : 


GPRMD 


GPRMD 


ENDHRD 
L10000: 


et seme 


SEQ 0031 | 
.SBTTL HARDWARE P-TABLE 


KEXSAAAAALAR ALASKA AAA AAA AAA AAA AAA AAA AAA AAA AIA AES | 
P-TABLES IN GENERAL ARE USED TO PROVIDE CERTAIN 
HARDWARE PARAMETERS 1.£. VECTOR ADDRESSES, PRIORITY 
LEVELS, £€.1.C. THE GET PARAMETER DATA (GPRMD) CALL 

1S USED HERE FOR HARDWARE PARAMETER CODING...... 
KAXKAAAAAAA AAA AAA AA AAA AAA AAA A AAA AAA AAA AAAI KEY 


. WORD L10000-LSHARD/2 


GETCNT, 0, 0.177400, 0. 7, YES 
.WORD TSCODE 
.WORD GETCNT 
.WORD 177400 
-WORD TSLOLINMN 
-WORD  TSHILIM 
GETERM. 0,0, 377, 1,63., YES 
.WORD TSCODE 
.WORD GETERM 
-WORD 377 
-WORD TSLOLIM 
.WORD TSHILIM 


= ee 


EVEN 


DZKCH MACRO M11 
DEFAULT HARDWARE P-TABLE 


316 007312 
007312 
007314 

317 007314 

318 007716 


000001 
000001 
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ENDHW 
L10001: 


piensa ee 


.SBTTL DEFAULT HARDWARE P-TABLE 


KAAEAAAAAAA AAA AAA AA AAA AA AAA AAA AAA AK AKE 
PARAMETERS HERE ARE USED AS DEFAULT IN 
OPERATOR DIALOGUE............ 

AXXAAAAAAAAA AAA AAA AAA AAA AAA AAA EKY 


-WORD L10001-LSHW/2 
.WORD 1 > CONTROLLER-’TERMINAL DEFAULT 


SEQ 0032 


ED eS 


ee ee ee ee 


Se eee cee eee - =< 


_ a ee mee 


OZKCH 


MACRO M11 
SOF THARE P-TABLE 


007316 
007316 


007320 


007320 
007320 


007320 
007320 
007322 


007322 
007322 


007322 
007322 


007322 
007322 
007322 


000000 


000009 


104025 
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BGNSFT 


.SBTTL SOFTWARE P-TABLE 


MERA AA AAA AAA AAA AAA AAA AAA KAKA AK 
ANOTHER SEPERATE GND OPTIONAL PARAMETER 
TABLE ASSEMBLED WITH THE DIAGNOSTIC 
PRUGROE..G..... 
KAKAAAAAAA EAA KAKA AAA AAA AAA AAA AAA AAA 


WORD L10002-L$SCFT/2 


LSSOFT: : 


ENDSFT 


. EVEN 


L10602: 


BUILD 
BGNSW 
LSSH: : 
ENDSW 


SOFTWARE P-TABLE 


-WORD = L10003-L$SW/2 


L10003: 


BGNRPT 


LSRPT: - 


ENDRPT 


L10004: 


EMT CSORPT 


SEQ 0033 
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UISPRTCH TABLE 


SEQ 0034 — 

246 .SBTTL OISPATCH TABLE 
347 ; 
248 ; 
349 3 KXXAAAAAAAAAA KAA AAA KAA AAA KAA KAA AAA AAA AKER 
350 ; THIS CALL 1S USED AS A DIRECTIVE FOR THE ASSEMBLY 
251 : OF A DISPATCH TABLE WHICH WILL CONTAIN THE SYMBOLIC 
352 : ADDRESS OF EACH TEST CONTAINED IN THE DIAGNOSTIC 
353 : ra es Tee 
4 ; KXKKKEKKAAKAK AKA KAA AAA AAA AAA AKA AKA KAKA KARA 
356 j 
357 007324 DISPATCH 1 

007324 000001 . WORD 1 

007326 LSDISPATCH: - 
“ 0072326 011370’ WORD T1 
258 


: 
| 


OZ2KCH 


MACRO M11 


INIT CODE 


4 
407 


007330 
007330 


007330 
007330 
007332 
007334 
007336 
007342 


007346 
007352 
007354 
007360 


007362 


012746 


005037 
005037 


012701 
005021 
020127 
001374 


005037 
012737 
012705 
010537 


012746 


001 


005236 ' 
005246 ' 


000262 ' 
001006" 


000226 ' 


000000G 


000011 
000220' 


000214" 


000216' 
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a % Ss Be Be Be Be Be Ba Be We 


we Sy We Ge Ge Ve. We 


BGNINIT 


LSINIT: : 


1398: 


308: 


. SBTTL 


AEAAAAAA AAA AAA AAA AA AAA AA AAA AAA AA AA AAA AA AAA AAA AAA AAA A AKEE 


INIT CODE 


THIS INITIALIZATION SECTION OF THE PROGRAM PROVIDES 
OPERATOR INTERFACE. AT ENTRY A TABLE HOLDS A MAXIMUM 
OF 3 CONTROLLERS AND 63 TERMINALS PER CONTROLLER. 
THE SYSTEM GENERATION 1S CHECKED SO THAT A TABLE OF 


LUGICAL UNiTS IS BUILT. THIS !S THEN EQUATED TO PHYSICAL 
DEVICES ON A SPECIFIED CONTROLLER. HAVING DONE THE ABOVE 


THE ROUTINE ASSIGNS LOGICAL UNIT NUMBERS (LUNS) TO 
LOGICAL DEVICES (SB'S)... 


RESOURCES USED FROM RSX-11M ARE THE DIRECTIVES, 


Qi0$, DIRS, 


ALUNS, 


GLUNS. 


EXITSS 


RESOURCES USED FROM THE DIAGNOSTIC SUPERVISER ARE. 


GPHARD. 


PRINT.... 


GPHARD-- THE GET PARAMETER HARD CALL. REQUEST A POINTER 


TO THE TABLE. WHICH HOLDS THE CONTROLLERS AND TERMINALS 


ON THAT CONTROLLER... 


PRINT-- OUTPUTS MESSAGES, AND ERRORS TO THE TELETYPE E.T.C .. 


AT EXIT THE ROUTINE PRINTS OUT . THE TOTAL NUMBER OF 
ACTIVE TERMINALS ON THE BUS. A PHYSICAL DEVICE ON A 
CONTROLLER. A CORRESPONDING LOGICAL DEVICE. AND AN 


ASSOCIATED LOGICAL UNIT NUMBER... 


++ 


pS SS 9 S&S 9 0S 9 08 0 0 8 0290 0990309880900 0 6800005 05555550500000555 5 5: 


CLR 


XXEKAAAAAAAAAA AAA AAA AKA AAA AAA AAA AAA AAA AAA AAA AAA KARE ERE 
CLEAR STORAGE LOCATIONS FOR SUBSEQUENT INITIALIZATION CODE. 
AXAAEAAAAAAA AAA AAA AAA AAA AAA AKA AAA AKA AAA AKA AKA EAE 
#cRRBRT,R1 

(R1)+ 
Ri. #SCBADR 


139% 
RAXKEARAAAA AA AAA AAA AAA AAA AAA AAA A AKA AAA AKERS EAR EAE RES 
QI10DPB+10. AST 
#10. DET, QIODPB+10. FUN 
#LUN, RS 
R5, Q@IODPB+10. LUN 
nQ1ODPB 
RQIODPB, -(SP) 


BNE 
CLR 


SEQ 0035 


' 


*CANCEL ANY OUTSTANDING MARK TIME REQUESTS 


DZKCH 


MACRO M11 


INIT CODE 


457 
458 
459 


460 
461 


007410 
007412 
007414 
007420 


007422 
007426 
007432 
007436 
007440 
007440 
007442 
007444 


007446 
007450 
007452 
007454 
007460 
007462 
007464 
007470 
007472 
007500 
007504 
007504 
007510 
007512 
007514 
007522 
007530 


007632 
007636 


007640 


104377 
005205 
020527 
003767 


012705 
013703 
010337 
005004 


010400 
104055 
011025 


005204 
005303 
001372 
012715 
005000 
005003 
012702 
005004 
012737 
010337 


012746 
104377 
103444 
012737 
012737 


012746 


005004 


005001 


000113 


000306 ' 
000014 ° 
05250' 


177777 


177777 


000011 
000252’ 


000244 ' 
000011 
000262 ' 
000254 ' 
000266 ' 
003122" 
003123' 
004122' 


000002 


003122" 
003123' 
004122" 


000002 


177777 
005250' 
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1$: 


O00246' 2%: 


000256 ' 
000260 ' 


003122" 


3$: 


4S: 


5S: 


CLR 
GPHARD 


MOV 


0<377> 
RS 


RS. #75. 
30% 


RUNTBL, RS 
LOUNIT,R3 
R3,. UNITS 
RY 


R4,RO 
MOV 


EMT 
(RO), (RS)+ 


#LUN, ALUDPB+2 

R3, ALUDPB+6 

#ALUDPB 

#ALUDPB. -(SP) 
0<377> 

4§ 

#LUN, GLUDPB+2 
RERRBRT, GLUDPB+4 
#GLUDPB 
#GLUDPB, - (SP) 
0<377> 

ERRBRT+4 

3% 


R4, IBUFO+O(RO) 
RZ. IBUFO+1(RO) 
R3, IBUFYCRO) 


R4, IBUFO+0(RO?} 
RZ, |BUFO+1(RO) 
R3, IBUFYCRO) 


2 

#-i, IBUFOCRO) 
UNITS. R3 

RY 


R1 


R4Y,RO 


CSGPHRD 


SEQ 0036 


+64 ONE-WORD UNIT TABLE 
*NUMBER OF UNITS FROM HEADER 


+ INIT POINTER TO P-TABLE 
*GET POINTER TO HARDWARE P-TABLE 


GET TERM & CONTROLLER # FROM HARDWARE 
+P-TABLE .PUT IN UNIT TABLE 

*NEXT TABLE 

+LAST P-TABLE? 

+BRANCH IF NO--- 

*ELSE INSERT END OF TABLE FLAG 
OFFSETS TO TEMPORARY TABLES IN IBUFO 
*SB # INDICATOR 

CONTROLLER # INDICATOR FIRST TIME THRU 
+ TERMINAL # INDICATER 

+SET THE LUN =11 

*SET THE DEVICES 

* ISSUE 170 REQUEST 


+CHECK IF REQUEST IS REJECTED 

*ELSE SeT THE LUN FOR THE G- DIRECTIVE 
GET THE LUN INFO BUFFER ADDRESS 

+ ISSUE 170 DIRECTIVE 


*CHECK FOR BROADCAST CHANNEL 
*BRANCH IF BROADCAST CHANNEL 
*STORE TERMINAL # IN TABLE 
*STORE CONTROLLER & 

*STORE SB & 

UPDATE PHYSICAL TERMINAL & 
;UPDATE POINTER 

:UPDATE SB & 


> INCREMENT CONTROLLER & |.£. LOG NEXT CONTROLLER 
*CLEAR TERMINAL #. |.£ TERMINALS ON NEXT CONTROLLER 
*STORE TERMINAL & 

*+STORE CONTROLLER & 

STORE SB 

UPDATE TERMINAL & 

>UPDATE SB f& 

UPDATE POINTER 

*ASSIGN NEXT TERMINAL 

+END OF SB TABLE 

*GET RUNTIME UNIT & 

+POINTER TO UNTBL CONTAINS 

*PHYSICAL # IN LO-BYTE 

+& CONTROLLER # IN HI-BYTE 

+POINTER TO IBUFO TABLE 


— eer rt ee ete es ES Se 4 
ee ee re — 


INIT 


ie a 
COD 


462 007642 
et 007646 


497 


007724 
007726 
007732 
007736 
007742 
007744 
007746 


007752 
007754 
007756 
007756 


— M11 


016402 


000476 
016437 


005046 
153716 
005046 
153716 
012746 
012746 
010600 
104017 
062706 


005303 
001433 


010346 
010446 
016464 
062704 
005303 
001371 


012604 
012603 
005337 
005737 
001311 


012746 
012746 
010600 
104017 
062706 


012746 
063 
104377 


000306 ' 
003122’ 


003122’ 
000002 


004122’ 
000002 


000306' 
007234 ' 
007235’ 


010674 ' 
000003 


000010 


000310' 
000002 


005250 ' 
005250 ' 


010767' 
000001 


00000" 


001 
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6S: 


000506' 7%: 


007234" 8%: 


000306' 9%: 


MOV 


UNTBL(R4),R2Z 
ret) 


$ 
IBUFOCR1) 
8% 
#Z.R1 


6$ 
IBUF4Y(R1), DEVTAB+0(RY) 


#2,R4 


UNTBL(R4). TEMP 


steiner 


SEQ 0037 


*GET CONTROLLER # TERM # FROM UNIT TABLE 
*CHECK IF SAME FROM MAPPED TABLE 
*BRANCH IF SAME 

+CHECK IF END OF TABLE 

+BRANCH IF END 

+ GET NEXT ITEM 

CONTINUE CHECKING 

STORE LOGICAL SB NUMBER 

+GET NEXT UNTBL ENTRY 

*LAST PHYSICAL TERMINAL TO BE STORED 
*BRANCH IF NO-- 

*ELSE GET NEXT DEVICE 

+ TEMPORARY STORAGE FOR PRINT ROUTINE 


PRINTF #MSGO. <B. ies <(B, TEMP+0> 
CLR 


-(SP) 
TEMP+0, (SP) 
(SP) 


TEMP +1, (SP) 
#MSGO, - (SP) 
#3,-(SP) 
SP, RO 
CSPNTF 
#10, SP 
+PRINTED THE NON-SYSGENED MESsAGE 


EAT TIT ibbbibbbeaaeaaaaaaa Latter e est rt 
BUBBLE ROUTINE. . 


++ 


IF ONE . OR ALL TERMINALS ENTERED ARE UNASSIGNABLE 
OR UNATTACHABLE THIS ROUTINE ELIMINATES THEM OFF 
THE TABLE AND ABORTS THE PROGRAM... 


PRINTF 


EXITSS 


10$ 
CRS, R4> 


UNTBL+2(R4), UNTBL. (CRY) 


#2,R4 

R3 

9% 

CRY,R3> 

UNITS 

UNITS 

53 

aMABORT 
MOV 
MOV 
MOV 
EMT 
ADD 


(PC )+,-(SP) 
51.,1 
0<377> 


KAKA KAA AKER AAA KAKA AAA AAA AAA AAA AAA AAA AAA AKA KEK KEE 
D RS 


»ONE TOO MANY UNITS? UNASS!IGNABLE? 
page IF ONE TOO MANY 
; SAVE 


-BUBBLE UP FROM BELOW TO THIS LOCATION 
+NEXT LOCATION 

*DECREASE LOCATION COUNT 

>BRANCH IF NOT DONE 

*RESTORE 


*ELIMINATE ONE UNIT OFF TABLE 
>ARE THERE ANY MORE DEVICES 
+ YES--BRANCH 
+NO-PRINT ABORT MESSAGE 
#MABORT, - (SP) 
ni,- (SP) 
SP,RO 
CSPNTF 
#4, SP 
*AND EXIT TEST 


SL A CL A ee 


DZ2KCH 


INIT CO 


MACRO M11 
DE 


498 010044 
499 010050 
500 010054 


501 


5 

525 
526 
527 


010056 
010056 
010062 
010066 
010070 
010072 
010076 
010076 
010100 
010102 
010104 
010106 
010112 
010116 
010124 
010130 
010134 
010140 
010140 
010144 
010146 
010150 
010154 
010154 
010156 
010160 
010162 
010164 
010170 
010174 
010176 
010200 
010204 


010206 
010212 
010216 
010216 
010222 
010224 
010226 
010232 
010234 
010236 
010240 
010240 
010246 
01 


010262 


005337 
005737 
001013 


012746 
012746 
010600 
104017 
062706 


012746 


116102 
110237 


012746 
104377 
103017 
013704 


005046 
150416 
005046 
150216 
012746 
012746 
010600 
104017 
062706 
0004 37 


110561 
010537 


012746 
104377 
103411 
062701 
005205 
005303 
001332 


012761 


000457 
013704 


0050 
150216 


005250' 
005250’ 


010767' 
000001 


000004 


001 


000011 

005250 ' 
O000000G 
000246 ' 
000506 ' 
000252 ' 


000244 ' 


0000006 


011020' 
000003 


000010 


000507’ 
000220' 


000214 ' 


000002 


15$ 
177777 000506' 
000000G 
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10S: 


11%: 


000216' 
12$ 


13%: 


14%: 


16%: 


PRINTF 


EXITS$S 


MOV 
PRINTF 


MOV 


SEQ 0038 


UNITS >ONE TOO MANY UNITS 
UNITS +LAST DEVICE? 
11$ +BRANCH IF NO 
#MABORT sELSE PRINT ABORT MESSAGE 
MOV #MABORT, -(SP) 
MOV #1,-(SP) 
MOV SP,RO 
ENT CSPNTF 
ADD #4, SP 
*AND EXIT 
(PC)+,-(SP) 
1.2% 
0<377> 
R1 *DEVICE TABLE POINTER 
#LUN, RS ;SET THE LUN 
UNITS, R3 + KEEP COUNT 
#10. ATT, QIODPB+10.FUN ;SET FOR ATTACHES 
R5, ALUDPB+2 >SET LUN FOR DIRS 
DEVTAB+O0(R1),R2 >GET THE SB DEVICE 
RZ, ALUDPB+6 *SET THE DEVICE NUMBER 
#ALUDPB , ISSUE THE 170 REQUEST 
#ALUDPB, -(SP) 
0<377> 
135 >BRANCH IF REQUEST IS ACCEPTED 
SDSW, RY + 1F NOT GET ERROR CODE 
ciel ria ak ota >PRINT ERROR MESSAGE XUNASSIGNABLE TERMINAL 
-(SP) 
BiSB R4, (SP) 
CLR - (SP? 
BISB R2, (SP) 
MOV #MSGi.-(SP) 
MOV SP, RO 
EMT CSPNTF 
ADD #10, SP 
17% ;DO NOT TRY TO ATTACH-- 
*;BUT GO GET RID OF UNIT 
>FROM THE DEVICE TABLE 
RS, DEVTAB+1(R1) >PUT THE LUN IN THE DEVICE TABLE 
R5, Q1IODPB+10. LUN 
#Q10DPB > ISSUE 170 REQUEST 
#QliODPB, - (SP) 
0<377> 
16$ *ERROR INDICATOR 
#2,R1 >;GET NEXT SB (LOGICAL) 
RS >NEXT LUN 
R3 >CHECK FOR LAST SB 
12$ >BRANCH IF NOT--GO DO NEXT ASSIGN 
#-1,DEVTABCR1) > INSERT END OF FLAG IN DEVICE TABLE 
22$ >AND PRINT ACTIVE DEVICE MAP 
SOSH. RY >PRINT ERROR MESSAGE 1.€ UNATTACHABLE DEVICE 
PRINTF #MSG. <B.R2>, <B,.R4> 
CLR - (SP) 
BISB R4Y, (SP) 
CLR - (SP) 
BiSB RZ, (SP) 


: 


DZ2KCH 
cod 


INIT 


555 
557 


558 
559 
560 
561 
562 


010264 
010270 
010274 
010276 
010300 


010304 


010306 


010342 
010344 
010346 


010352 
010356 


C104 36 
010440 
010444 
010450 


‘ee M11 


012746 
012746 
010600 
104017 
062706 


O00£303 


001417 


010346 
010146 
016161 
016161 
062701 
005303 
001366 


012601 
012603 
000667 
005337 


005737 
001330 


012746 
012746 
010600 
104017 
062706 


012746 


063 
104377 


013703 


005046 
150316 
012746 
012746 
010600 
104017 
062706 


005000 
116001 
116002 
116004 


011101° 
000003 


000010 


000310‘ 000306’ 
000510' 000506' 


000002 


005250 ' 
005250' 


010767’ 
000001 


000004 


001 


005250' 


011162' 
000002 


000006 


000507 ' 
000506 ' 
000307" 
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17%: 


183: 


19S. 


223: 


203: 


SEQ 0039 


#10, SP 


XAXAAAAAKAAAAAAAAAA AAA AAA AA AAA AAA 
BUBBLE ROUTINE..... 
XAXAKERAAAAAKAKAAA AAA AAA A AAA AAA AK AKE 


DEC 


MoV 
PRINTF 


CLR 

MOVB 
MOVB 
MOVB 


R3 


19% 
CR3.R1> 


UNTBL+2(R1), UNTBL(R1) 


DEVTAB+2(R1),DEVTAB(R1) 


* BUBBLE UP FROM BELOW TO THIS LOCATION 
+NEXT LOCATION 
+ DECREASE UNITS LOCATION 
>BRANCH IF NOT FINISHED 
+;GO DO NEXT ASSIGN |. E ALUNS 
>ELIMINATE ONE UNIT OFF TABLE 
+ THIS INDICATES ONE UNIT LESS TO TEST 
>CHECK FOR ONE DEVICE AND UNASS!IGNABLE 
>BRANCH IF NOT------ 
>PRINT ABORT MESSAGE 
wMABORT, -( SP) | 
SP, RO 
CSPNTF 
#4, SP 
>AND EXIT 
+;GET NUMBER OF ACTIVE DEVICES 
»PRINT NUMBER OF ACTIVE DEVICES 
~ (SP) 
SP.RO 
CSPNTF 
#6, SP 
+AND HEADER FOR ACTIVE DEVICE MAP 
>POINTER TO TABLES 
>GET LUN TO BE PRINTED 
-GET LOGICAL SB NUMBER 
;GET CONTROLLER NUMBER 


#2,R1 
R3 

18% 
CR1,R3> 


12$ 
UNITS 


UNITS 
15% 
RMABORT 


(PC) +, -(SP) 
51.,1 
94377) 


UNITS, R3 
#MSGZ, <B,R3> 
C 


RO 
DEVTAB+1(RO).R1 
DEVTAB+O(RO),.R2 
UNTBL+1°(RO).R4 


ONE TOO MANY UNITS IN DEVICE TABLE 
*BECAUSE DEVICE iS UNASSIGNABLE 

OR CANNOT BE ATTACHED 

*+BRANCH IF ONE TOO MANY 


#i.-(SP) 


R3, (SP) 


#Z2,-(SP) 


SL Eee --o _ oC 
_— - 
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—— 
ee SR 
ee ee ee ee 


INIT CODE SEQ 0040 
563 010454 116005 000306’ MOVB UNTBL+0(RO),RS *GET PHYSICAL TERM# 
564 010460 PUSH RO *+SAVE ROXXSUPERVISOR USES IT 
610460 010046 
565 010462 PRINTF #MSG3. <B.R5>, <B.R4>. <B.R2>,<B, RI); 
010462 005046 CLR ~ (SP) 
010464 150116 BISS Ri, (SP) 
010466 005046 CLR ~ (SP) 
010470 150216 BISB RZ, (SP) 
010472 o05046 CLR - (SP) 
010474 150416 BISB R4, (SP) 
010476 005046 CLR -(S? ) 
010500 150516 BISB R5, (SP) 
010502 012746 011306’ MOV #MSG3, - (SP) 
010506 012746 000005 MOV #5,-(SP) 
010512 010600 MOV SP, RO 
010514 104017 ENT CSPNTF 
010516 062706 000014 ADD #14, SP 
566 010522 POP RO *RESTORE RO 
010522 012600 
| 567 *PRINT ACTIVE DEVICE MAP 
568 010524 062700 000002 ADD #2,RO 
569 010530 0052303 DEC R3 
570 010532 001342 BNE 20% 
ae 010534 005005 218: CLR RS *ENTER AST WITH R5 
5 
573 
574 ; KEKE RRA AKA AAA AKA AAA AAA AAA AAA AAA KEK 
575 ; PROGRAM INITIALIZATION 
| 576 ; RAK AKAA AAA AAA AA AAA AAA AAA AAA AKA KAA . 
577 
z 
| 580 010536 005037 000302’ INIT: CLR DEVPTR *>SET DEVICE POINTER TO START OF TABLE 
581 010542 013737 005250' 000304' MOV UNITS, NUMDEV *SET THE NUMBER OF DEVICES 
582 010550 012701 001016" MOV nOBUFF.R1 GET 1°ST OUTPUT BUFFER ADDRESS 
583 010654 612102 9S: MOV (R1)+,R2 GET BUFFER. UPDATE ADDRESS 
584 010556 105022 CLRB (R2)+ *CLR 1°ST BYTE IN BUFFER 
585 010560 005202 INC R2 GET NEXT BYTE 
586 010562 112712 O00014 MOVB R14, (RZ) *LOAD TRANSPARENT READ COMMAND 
587 010566 005711 TST (R1) *CHECK FOR END OF BUFFER 
588 010570 001371 BNE 9% *BRANCH IF NOT END---- 
589 010572 005001 CLR R1 > INITIALIZE REGISTER 
590 010574 112737 177777 005252' MOVB #-1,ERRTBL > INIT ERROR TABLES 
591 010602 005201 10S: INC R1 
592 010604 105061 005252' CLRB ERRTBL(R1) 
593 010610 022701 001750 CMP #1000. .R1 
594 010614 001372 BNE 10% 
595 010616 105037 007222' CLRB TERM CLR TERMINAL # LOCS: 
596 010622 005037 005242' CLR BFFPT -CLR CURRENT BUFF POINTER 
597 010626 005037 007224' CLR ERRPNT CLR ERROR POINTER 
598 010632 012700 001006' MoV nOFFLIN+64. .RO *CLEAR OFFLINE TABLE 
| 599 010636 005040 14S: CLR - (RO) 
600 010640 020027 000706' CMP RO. SOFFLIN *END OF TABLE 
601 010644 101374 BHI 14% 
602 010646 MRKTS$S ,#60.. #2, #MRKAST 
010646 012746 011744' MoV RMRKAST, - (SP) 
010652 012746 000002 MOV #2,-(SP) 


S—— i ee 


¢ 4 Nig 
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INIT CODE 


SEQ 0041 

010656 012746 000074 MOV #60. .-(SP) 

010662 005046 CLR - (SP) 

010664 012746 MOV (PC) +, -(SP) 

010666 027 005 .BYTE 23..5 

010670 104377 EMT 0<377> | 
603 010672 ENDINIT | 

010672 L10005: | 


010672 104011 ENT CSINIT 


INI 


615 


616 


617 


OZ2KCH 
T COO 


010674 
010677 
910702 
010705 
010710 
010713 
010716 
010721 
010724 
010727 
010732 
010735 
010740 
010743 
010746 
010751 
010754 
010757 
0107°2 
0107¢. 
010767 
010772 
010775 
011000 
011003 
011006 
011011 
011014 
011017 
011020 
011023 
011026 
011031 
011034 
011037 
011042 
011045 
011050 
011053 
011056 
011061 
011064 
011067 
011072 
011075 
011100 
011101 
011104 


_— M11 
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SEQ 0042 


AEARAAAA AKA AAA AA AAA AAA AA AAA AAA AA AAA AAA AAA A AAA AA ARATE 


; GLOBAL ASCI! FOR INITIALIZATION SECTION 

; ALL MESSAGES FOR THE PROGRAM INIT ARE CONTAINED HERE. . 

; AEKAAAA AAA AAA AAA AAA AAA AAA AAA AA AA AAA AA AAA KAKA AAA KERE 

MSGO: .ASCIZ “%NZACONTROLLER %D1%A. TERMINAL %D3%A iS NOT SYSGENED IN. XN” 


MABORT. .ASCIZ “*%NZAPROGRAM |S ABORTED%N" 
MSG1: -ASCIZ /“%NZATERMINAL %D2%A CANNOT BE ASSIGNED - SDSW=%06/ 
MSG: .ASCIZ ““NZATERMINAL %D02%A CANNOT BE RTTACHED-SOSW=%03%N" 


a 





DZKCH 
INIT CODE 


618 


619 


620 


MACRO M11 


a 
oO 
NN 


WNND— — 
WINNS KF WOUID 


011352 
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een erento neers sssnestnnenesesrerunnninmensitensnense-niiioecisees ~ 


MSG2: 


MSG3: 


. ASC! I 


-ASCIZ 


. ASC12Z27%N%D3%8 


SEQ 0043 


ae Que enemnee et Se 
ee ae eee 


7“ANZRNUMBER OF ENTERED TERMINALS=%02%N/ 


7A~NZRUNIT #& CONTROLLER XX LOGICAL SB XX LUN Xx/ 


%D3%A %~D3%R %~D3%N/ 


OZKCH 
INIT CODE 


621 
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011355 040 040 C40 
011360 040 040 045 
011363 104 063 045 
011366 116 000 
. EVEN 


SEQ 0044 


eee 


OZKCH 


MACRO M11 


MAIN ROUTINE 


011370 
011370 


011370 
011374 
011400 


011402 
011410 
011414 
011420 


011422 
011426 
011430 


011434 
011440 
011446 
011454 
011460 
011466 
011474 
011502 
011510 
011516 
011524 
011532 
011532 


005037 
004737 
103460 


012737 
004737 
006237 
001765 


004737 
103770 
004737 


013703 
012737 
016337 
005237 
013737 
062737 
016337 
013737 
016337 
012737 
113737 


012746 


007226 ' 
011760' 


000400 
012256 ' 
605240 ' 


0120554 ° 
012134" 


005242’ 
003400 
001016' 
000236 ' 
005240" 
000002 
003102' 
005240 ' 
005122" 
013362" 
005244 ' 


000214" 
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BGNTST 
T1:: 


005240" 


44- 


000216" 
000236 ' 


000240' 
000240' 
000230’ 
000232' 
000224 ' 
000226' 
000220' 


.SBTTL MAIN ROUTINE 


AAKARAAEAAA AAA AAA AAA AAA AAA AAA AAA AAA AA AAA AAA AK AK KEKES 
THE MAIN ROUTINE EXECUTES A PROGRAM PASS.A PARTIAL PASS. 
PROCESSES A TERMINAL LIST. AND FINALLY ONE TERMINAL. 

A PROGRAM PASS IS DEFINED HERE AS ALL PATTERNS OF 

ALL DATA LENGTHS TO ALL TERMINALS. 

A PARTIAL PASS IS DEFINED AS ONE PATTERN. ALL DATA 
LENGTHS TO ALL TERMINALS. . 

A LIST OF TERMINALS CONTAINS 1-63 UNITS.. 

TO PROCESS A TERMINAL, RSX-11M'S DIRECTIVE 

PARAMETER BLOCK 1S LOADED AND AN 1/0 DIRECTIVE 1S 
ISSUED TO THE DECICE... 

FOO OOOO OOOO OOOO OOK 


EXECUTE A PASS 


CLR PATPT *CLEAR PATTERN POINTER 

JSR PC, C1 *SET BYTE PATTERN IN OUTPUT BUFFER 

BCS 6% +END OF TEST 

EXECUTE A PARTIAL PASS 

MoV #256. ,LENGTH *SET RECORD LENGTH 

JSR PC,D3 CHECK ERRORS 

ASR LENGTH > VARY RECORD LENGTH 

BEQ 1$ *>BRANCH IF END RECORD LENGTH 

PROCESS A LIST OF TERMINALS 

JSR PC,E1 SUBROUTINE (GET A TERMINAL FROM LIST) 
BCS 3$ > IF END Or TERMINAL LIST CHECK ERRORS 
JSR PC,E2 »-CALL POLL AND SET OUTPUT BUFFER ROUTINE 
PROCESS A TERMINAL 

MOV BFFPT.R3 -GET BUFFER POINTER 

MOV #10. RXP,QIODPB+10.FUN ;READ TRANSPARENT TO THE DEVICE 

MoV OSUFF(R3),QIODPB+10.A4 ;LOAD OUTPUT BUFFER ADDRESS 


INC QIODPB+10. AS *SKIP THE FREE FLAG 


MOV LENGTH, QIODPB+10. AS *LOAD OUTPUT BUFFER SIZE 
AOD #2, QI0DPB+10. AS -2 BYTES LESS THAN OUT-BUFF 
MoV INBUFF CR3),Q10DPB+10.A1 ;LOAD INPUT BUFFER ADDRESS 
MOV LENGTH, QIODPB+10. AZ *LOAD INPUT BUFFER SIZE 

MOV 1OSB(R3),QIODPB+I10. IST {LOAD STATUS WORD 

MOV #AST, QIODPB+10. AST >LOAD TERM AST ADDRESS 
MOVB LUNS, Q10DPB+10. LUN *LOAD LOGICAL UNIT NUMBER 
DIRS #Q100P8 > ISSUE 170 DIRECTIVE 

Mov #QiODPB,- (SP) 


SEQ 0045 


Le 


OZKCH 


MACRO M11 


MAIN ROUTINE 


678 


708 


709 
710 


011536 
011540 


011542 
011542 
011544 
011546 
011552 
011554 
011560 
011562 
011564 
011566 
011572 
011572 
011574 
011574 
011576 
011602 


011604 
011604 
011610 
011614 
011620 
011622 
011624 
011626 


011730 
011734 


104377 
000730 


010046 
005000 
023700 
001407 
105760 
001402 
10£720 
000770 
005237 


104022 


012600 
005727 
001672 


012746 


000770 


012746 
012746 

075 
104377 


013746 
013746 
010346 
013746 
012746 
012746 
010600 
04015 
062706 
005037 
005037 


005250’ 
000706 ' 


005246’ 


005236' 


011744" 
000002 
000074 


005 


005250" 


600706" 


005206 ' 
002 


005216' 
005214 ' 


005246 ' 
015311" 
000005 


000014 
005246 ' 
005236 ' 
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83: 
95: 


13%: 


ENT 
BR 


HY 
SEQ 0046 


0<377> 
4§ +GET NEXT TERMINAL. 


REXAAKAAAAAAAAAAAA AA AA AAA AAA AAA AAA AA AAA A AA EE 
KEEP PASS COUNT ONLY WHEN DEVICES ARE ACTIVE. 
AURSNSUSESSASUSAASSSESESSEAASESESAE SARA SA EAE AS IEEE 


PUSH 


MRKTS$S 
MOV 
MOV 
MOV 
CLR 
MOV 

. BYTE 
EMT 
CLR 
CLR 
May 
CMP 
BEQ 


PRINTX 


CLR 
CLR 


; SAVE 


> INIT POINTER TO OFFLINE TABLE 
*CHECK IF END OF OFFLINE TABLE 
*DO NEXT PASS iF END | 
CHECK FOR LIVE TERMINAL 
*1F LIVE KEEP PASS COUNT | 


RO 
UNITS,RO 
95 
OFFLIN(RO) 
8% 


(RO) + iF OFFLINE UPDATE POINTER 
7% *CONTINUE CHECKING 
PASS *LOG PASS 
*RETURN FOR A PEEK AT SUPERVISOR 
ENT CSBRK 
RQ RESTORE 
PASFG +TIME TO PRINT PASS COUNT? 
START *NO-CONTINUE TESTING. 


| 
i 
| 
| 
i 
, #60. . #2, RMRKAST | 
#MRKAST, - (SP) | 
#2--(SP) | 

i 


=($?) 
CPC )4, -(SP) 
23. ,5 
0<377> 
R1 *POINTER TO OFFLINE TABLE 
R3 > NUMBER OF ACTIVE TERMINALS PER PASS 
UNITS, R2 *GET MAXIMUM NUMBER OF UNITS 
R1,.R2 >END OF OFFLINE TABLE 
11% >BRANCH IF END 
OFFLIN(R1) *CHECK IF TERMINAL IS OFFLIN 
12$ > IF OFFLINE BRANCH 
R3 >LOG ACTIVE TERMINALS 
R 1 >UPDATE OFFLINE TABLE POINTER 
13% > CHECK NEXT TERMINAL 
#BUF GET THE SYSTEM TIME 
RBUF, - (SP) 
(PC) +, ~-(SP) 
61.,2 
0<377> 
#E OP, PASS. R3. BUF +G. TIHR, BUF 4G. TIMI -PRINT NUMBER OF PASSES E. T. 
MOV BUF +G. TIMI,-(SP) 
MoV BUF +G. TIHR,-(SP) 


MOV R3.- (SP) 


MOV SP,RO 
ENT CSPNTX 
ADD #14, SP 
PASS »RESET THE PASS COUNT 


PASFG >FOR THE NEXT PRINT PEPOPT 


ee EE 
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MAIN ROUTINE SEQ 0047 
711 011740 000613 10S: BR START +00 NEXT PASS 
712 011742 ENOTST 
011742 L10006: 


011742 104001 EMT CSETST 


EE ES ES SE 
—~- -=-- 


senses 
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DECLPRE A SIGNIFICANT EVENT PER 5 MINS. SEO 0048 
se _SBTTL DECLARE A SIGNIFICANT EVENT PER 5 MINS. 
716 ; 
717 ; 
718 ; 
719 ; XAXXAKAAAAAAAKAAAKAK AAA AAA AAA AAA AAA AAAI KEE 
720 > THIS ROUTINE USES THE MRKTS$S DIRECTIVE TO 
721 +PRINT THE NUMBER OF PROGRAM PASSES AND 
722 + THE NUMBER OF ACTIVE TERMINALS IN PRESENT PASS. 
725 -EVERY & MINUTES. 
sae , LoS 2 > oS 0999099650500 0 05555 5005505555565555 5056 6 | 
726 ; 
727 ; 
728 ; 
729 011744 005237 005236’ MRKAST: INC PASFG +SET THE 1 MIN. PASS FLAS. 
730 011750 005726 TST (SP )+ ;REMOVE EVENT FLAG PER RS¥x 
731 011752 ASTX$S , RETUPN 
011752 0127%6 MOV (PC)+,-(SP) 
011754 163 001 _ BYTE 115..1 
011756 104377 ENT 0<377> 
732 : 
733 ; 
734 ; 


OZ2KCH 


MACRO M11 


SET EYTE PATTERN IN GUTPUT BUFFER 


011760 
011764 
011772 
011774 
012000 
012002 
012004 
012010 
012012 
012014 
012020 
012026 
012030 
012032 
012034 
012036 
012042 
012044 
012050 
012052 


013704 
122764 
001004 
005037 
000261 
000423 
012700 
005003 
012001 
012702 
116461 
005201 
005302 
001372 
005203 
022703 
001363 
005237 
000241 
000207 


007226 ' 


000001 


007226' 


001016' 


000200 


005226 ' 


000010 


007226' 


C 
005226 ' 


000003 
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“oe & Ss Se Wea We Ge We 


23: 
3$: 


4S. 





.SBTTL SET BYTE PATTERN IN OUTPUT BUFFER 


KEXAASAAAAAA ALAA AAAS AA AAA AAA AAA AAA AAA AAA AEA 

THIS ROUTINE CONSECUTIVELY GETS ONE OF SEVEN 

DATA PATTERNS. PACKS IT INTO EIGHT BUFFERS (128 BYTES LONG) 
FOR SUBSEQUENT TRANSMISSION VIA THE SERIAL BUS 

TO THE DEVICES... 
++NOTE++ EIGHT TERMINALS ARE SIMULTANEOUSLY FROCESSED 
AT ANY GIVEN TIME. 
KAAAAARARAA ALAA AAA AKA AAA AAA AAA AAA AAA A AAA KAKA AKA KKK AKK 


PATPT,R4Y 
#1,PATTRNC(RY) 
1$ 

PATPT 


4% 
ROBUFF. RO 
R3 


(RO)+,R1 

#128. ,R2 
PATTRN(RY), DATACR1) 
R1 


*GET PATTERN POINTER 

*END OF PATTERN FLAG 

> 1F NO, GET BUFFERS 

+RESET THE POINTER 

*SET END OF PATTERN INDICATOR 
*AND RETURN 

*GET OUPUT BUFFER ADDRESS 
*BUFFER NUMBER COUNTER 

*GET BUFFERS O THRU 7 

*SET MAXIMUM DATA BYTE LENGTH 
»LOAD DATA PER BYTE IN BUFFER 
>GET NEXT BYTE 

»COUNT DATA BYTE LENGTH 

*BRANCH UNTIL FINISHED 

UPDATE BUFFER NUMBER COUNT 
*HAVE ALL 8 BUFFERS BEEN FILLED 
> 1F NO!'! FILL NEXT BUFFER 

> INCREMENT THE PATTERN POINTER 
*RESET END FLAG FOR PATTERN TABLE 
> RETURN 


Le seen stciengusseeeneeer=ven 


SEQ 0049 © 


nee 


O2KCH 


MACRO M11 


GET NEXT DEVICE AND LUN iNFORMATION 


803 
804 


012054 
012060 
012062 
012070 
012076 
012104 
012110 
012116 
012120 
012124 


2 012126 


012130 
012132 


013700 
006300 
116037 
116037 
116037 
005237 
023737 
003404 
005037 
000261 
000401 
006241 
000207 


000302 


000306 
000507 
000506 
000302 
000302 


000502 


" 007222' 
" 005244" 
" 007256" 


* 000304 ' 
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* 
4 
7 


4 


, ++ 


sees as eee 


SEQ 0050 


. SBTTL GET NEXT DEVICE AND LUN INFORMATION 


REAKAAAAAAAAA AAA AAA AAA AA AAA AAA AAA AAA AAA AAA AAA AAA KAA AAA EEE 


*ROUTINE TO GET THE NEXT PAIR OF DEVICE NUMBER AND ASSCOIATED LUN 
RETURNS A -1 IN LUN..DEV AT END OF TABLE 


: INPUT: 


4 


: OUTPUT: 


DEVPTR 
DEVTAB 


LUNS = 


= POINTER TO NEXT DEVICE 
= TABLE OF ACTIVE DEVICES & LUNS 


TERM = TERMINAL NUMBER OF NEXT AVAILABLE UNIT 
RSX ASSIGNED LUN NUMBER 


KAKAA AAA KAKA AAA AAA AAA AK AAA AAA AA AAA AA AAA AAA AAA AAA AAA AAA AAA EAE 


DEVPTR.RO *GET POINTER TO NEXT AVAILABLE UNIT 
RO + CHANGE TO WORD OFFSET 
UNTBL+0(RO), TERM +GET THE TERMINAL NUMBER 
DEVTAB+1(RO),LUNS +GET LUN NUMBER 
DEVTAB+0(RO), SB +SAVE SB (LOGICAL DEVICE 
DEVPTR +POINT TO NEXT SET 
DE VP TR, NUMDE V +END OF LIST 
1$ ; NO---RETURN 
DEVPTR +POINT TO TOP OF LIST 

*SET END OF LIST INDICATOR 
z$ *AND RETURN 

*RESET END OF LIST INDICATOR 
PC RETURN 





OZ2KCH 


MACRO M11 


POLL AND SET OUTPUT BUFFERS 


843 
844 
845 
846 
847 


012134 
012134 
012136 
012142 
012146 
012152 
012154 
012156 
012160 
012164 
012166 
012170 
012170 
012174 
012176 
012200 


012232 


012236 
012240 
012242 
012246 
012254 


005046 
012746 


005710 
001006 


012746 
012746 


113720 
113710 


106310 
106310 
162710 
162737 
000207 


000001 
000005 
000001 


JUO5 


001016’ 


000001 
002 


000000 
000002 


005242' 


007256 ' 
007222' 


000001 


001016' 


005242" 
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, 


4 


: INPUT: 


: OUTPUT: 


124$: 


2$: 


.SBTTL POLL AND SET OUTPUT BUFFERS 


SS tse 


AEARSAASAAAA ALARA AAA AAA AAA AA AAA AAA AAA AAA AAA AA AAA AAA EEE 
, ++ 

ROUTINE TO DETERMINE THE NEXT OUTPUT BUFFER TO USE 
TERM = TERMINAL NUMBER 


BFFPT = OFFSET TO B 
OUTBUF BYTE 0 
OUTBUF BYTE 1 


UF 


IN USE, 


SB 
TERMINAL NUMBER 


FER TO USE 


1F O-NOT IN USE 


KEXAAAAAAAAA AAA AAA AAA AAA AAA A AAA A AAA AA AAA AA AKA AAA KAKA EEK 
ROUTINE LOOPS FOREVER UNTIL A BUFFER BECOMES FREE 
KAKA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AKA AAA AEA AEE 


MRKTSS 
CLR 


#1.,85.,41 
- (SP) 


#i,- (SP) 
#5. ‘ - (SP) 
# 1. ,~ (SP) 
23..5 
0<377) 
#OBUFF.RO 
(RO) 

124% 

#1 

fi, -(SP) 
(PC )+,-(SP) 
41.,2 


1$ 

RO. BFFPT 
(RO), RO 
SB, (RO) + 
TERM, (RO) 


(RO) 

(RO) 

#B1TOO, (RO) 
sOBUFF, BFFPT 
PC 


*MARK TIME FOR #5 TICKS 


*>START OF BUFFER TABLE 
TEST FOR END OF TABLE 


*BRANCH IF NOT 
>WAITFOR SIG EVENT 


*START AT BEGINNING OF TABLE 
*SEE IF BUFFER 1S IN USE 
>LOOP IF NON ZERO 


»SAVE IF BUFFER POINTER 
*GET ADDRESS OF TABLE 


SET SB 

- INSERT DESIRED TERMINAL NUMBER 

+ TERMINAL # MUST BE LEFT JUSTIFIED 
+IN THE BYTE WITH BITO SET 

+AND BIT#1 CLEARED 


-BITS IN BYTE HAS TO BE LEFT JUSTIFIED 


+COMPUTE AND SAVE OFFSET 
>RETURN 


SEQ 0051 


; 


DZKCH 


012314 
879 012316 
880 012322 
881 012324 

012324 


890 012354 


MACRO M11 
CHECK ERRORS- CHECK FOR BAD CRC 
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010246 


001406 


012746 
012746 


000001 
000005 
000002 

005 


001016' 


000002 
002 


000020 
012526' 


007262 ' 


.SBTTL CHECK ERRORS-CHECK FOR BAD CRC 


SESTAATAAAATAAATALASALAA AAA AAA AA AAA TATA ARAL AKT 
naa ROUTINE WAITS FOR ALL BUFFERS TO BE FREE, 

(DONE BY THE AST SERVICE ROUTINE CHECKS FOR LIVE 
TERMINALS ON THE oe AND ISSUES A COMMAND TO 

GENERATE BAD CRC FROM THE DEVICES. 

NON DETECTED BAD CRC ERRORS BY ANY CONTROLLER ARE 
LOGGED TOGETHER WITH PROCESSED ERRORS oa AST SERVICE 
ROUTINE, FOR SUBSEQUENT PRINT-OUT BY THE 

PRINT MODULE. . 
esttstsititsiseisisststtsitsttittttttttt tt ttt tT ttt TT 


s+ &. Se & Se Se Se Be Se Be 


. 
, 


; NEREUAREaNDUEREaEENEREEESEEAEE EEE EAEN EEE 
FOR ALL BUFFERS TO BE FREE..... 


D3: : PUSH CRZ,R4,R3,R1> + SAVE REGISTERS 
CLR Ri 
CLR R2 

D3A: MRKTSS #2.,85.,81 i MARK TIME FOR SIG EVENT 
CLR - (SP) 


MOV #1,-(SP) 
MOV 85.,-(SP) 
MOV #2.,-(SP) 


Vv (PC)+,-(SP) 
.BYTE 23.,5 
ENT 0<377> 
TSTB QOBUFF(R1) 1S BUFFER FREE? 
BEQ 123$ +BRANCH IF FREE 
WTSESS & +WAITFOR SIG EVENT 


2 

MOV #2,- (SP) 
MOV (PC )+, -(SP) 
41.,2 
ENT 0<377)> 
BR D3A ‘CHECK FOR FREE BUFFER AGAIN 
1235: TST (R1)+ ; COUNT NUMBER OF BUFFERS FREE 

CMP #16. ,R1 +8 BUFFERS FREE? 

BNE D3A * BRANCH IF NO 

JMP 15$ + TEMPO BYPASS. . 
missiiisiiicerititiiesiiccserstirstersttistits sii: 

CHECK FOR BAD CRC............., 
TTT TTTTTTTTITTTITTTITTTTTTTTTT TTT TTT TTT TTT TTT TTT 

CLR CRCFLG +CRC COMPLETE FLAG 


SEQ 0052 


DZKCH 


MACRO M11 


CHECK ERRORS-CHECK FOR BAD CRC 


012360 


012446 
012454 
012462 
012470 
012476 
012504 
012504 
012510 
012512 
012516 
012520 


012526 
012530 
012534 
012540 
012542 


012546 
012552 
012554 
012560 
012564 


012566 


012624 


012630 
012630 
012634 
012640 


116237 


012746 
104377 
005737 
001775 
112737 


005003 
116304 
122704 
001002 
000137 


122704 
001002 
000137 
122704 
001436 


122704 
001450 
122704 
001462 
122704 
001526 
122704 
001471 
122704 
001402 
000137 


012746 
012746 
010600 


000306’ 


000706" 


000306’ 
001042" 
000020 
003400 
001042" 
005240" 
003122' 
005240' 
005142" 
013264" 
000507" 
000214 ' 
007262' 


000014 


005252' 
177777 


Oi 3244 ' 
600001 
013122' 
000010 
000002 
000003 
000005 
000006 
000004 
013244 ' 


015436' 
o00c0c! 


001043" 
000216’ 
000236’ 
000240' 
000230" 
000232" 
000224 ' 
000226 ' 
000220' 


001043" 
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205: 


305: 
2135: 


2235: 


155: CLR R 
11%: MOVB ERRTBL(R3),RY 
BNE 18$ 
JMP 6% 
18$: CMPB #1,R4 
BNE 334% 
JMP 10% 
33S: CMPB #10,R4 
BEQ i$ 
CMPB #2, RY 
BEQ 2$ 
CMPB #3, R4 
BEG 34 
CMPB #5,R4 
BEG 53 
CMPB #6,R4 
BEQ 7% 
CMPB #4,R4 
BEQ 180% 
JMP 6% 
180%: PRINTF #LFCR 
MOV 
MOV 
MoV 


START CHECKING ERRORS 
MITTS tTttSTCTeTTTTTiTTTTTiTTTTTTTTT TTT TTT TTT 
3 


UNTBL (RZ) 
15$ 


R2 


OFFLIN(RZ) 
21% 


RZ 
(RZ)+ 
20% 
R2 


UNTBL+0(R2),R3 


R3, OBUFO+1 
#20, OBUF0+2 


#10. RXP, QIODPB+10. FUN 
ROBUFO+1, Q10DPB+10. AY 
LENGTH, Q10DP8+10. AS 
# IBUFO, QIODPB+10. Al 
LENGTH, QIODPB+10. AZ 
RISTATO, QIODPB+I0. IST 
#CRCAST, QIODPB+10. AST 
DEVTAB+1(R2), QIODPB+10. LUN 


#Q100P8 


#Q10DPB,-(SP) 


0<377> 


MOVB #14. OBUFO+2 
ROO OOEIOO OEIC CEO 200202 BOE 


*+START SEARCH FOR LIVE TERMINAL 
*1F END OF TABLE BRANCH OUT 
*ADJUST POINTER 

*ELSE CHECK IF TERMINAL !S OFFL 
*LIVE TERMINAL FOUND 

*READJUST POINTER 

*UPDATE TABLE POINTER 

CONTINUE SEARCH 

*READJUST POINTER 

*GET LIVE TERMINAL 

*LOAD LIVE TERMINAL INTO BUFFER 
*LOAD BAD CRC COMMAND 

*LOAD WRITE TO DEVICE 

+LOAD OUTPUT BUFFER ADDRESS 
*LOAD OUTPUT BUFFER SIZE 

+LORD INPUT BUFFER ADDRESS 
*LORD INPUT BUFFER LENGTH 
+LOAD STATUS WORD 

+LOAD AST ADDRESS 


* ISSUE 170 DIRECTIVE 


*CHECK AST ROUTINE 
+ 1F NOT COMPLETED CHECK AGAIN 


INE 


*LOAD LOGICAL UNIT NUMBER 


*RESTORE LOOP COMMAND IN BUFFER 


> INIT ERROR TABLE 


*>GET ERROR ENTRY & CHECK FOR ERRORS 


; END OF ERROR TABLE? 


;BRANCH IF NO CONTINUE TO CHECK 


*ELSE BRANCH OUT THRU RTS 
*ELSE CHECK FOR 

+ HARD-ERROR? 

*BRANCH IF NO-- 


>1S TERMINAL OFFLINE 
-ERROR CALL 


> ELSE CHECK FOR RETRY ERROR 


> ERROR? BRANCH IF YES TO ERROR CALL 


» ELSE CHECK FOR DSW ERROR? 


+ ERROR? BRANCH IF YES TO ERROR CALL 
*ELSE CHECK FOR TERMINAL ON-LINE CODE 


*YES- !T |S ONLINE - PRINT MESSAGE 


*ELSE CHECK FOR CRC ERROR CODE 


‘BRANCH IF YES TO INFORM OPERTOR 


-ELSE CHECK DATA COMPARE ERROR 
BRANCH OUT THROUGH RTS IF NO 


*PRINT CARRIAGE RETURN LINE FEEO 


ai,-(SP) 
SP, RO 


SEQ 0053 


= emeen ees wee = eee 
re Ne —e ee 


pes ee 


000004 


015436' 
000001 


000004 


015436’ 
000001 


000004 


015436" 
000001 


000004 


015436 ' 
000001 


OZKCH MACRO M11 
CHECK ERRORS-CHECK FOR BAD CRC 
012642 104017 
012644 062706 
943 
944 
945 
946 
947 012650 
012650 iC4464 
012652 000004 
012654 015213° 
012656 014054" 
948 
949 012660 000723 
950 012662 
012662 012746 
012666 012746 
012672 010600 
012674 104017 
012676 062706 
951 012702 
012702 104463 
012704 000001 
012706 015062’ 
012710 014370' 
952 012712 000706 
953 012714 
012714 012746 
012720 012746 
012724 010600 
012726 104017 
012730 062706 
954 
955 012734 
012734 104464 
012736 000002 
012740 015127" 
012742 014734" 
956 
957 012744 000671 
958 
959 012746 
012746 012746 
012752 012746 
012756 010600 
012760 104017 
012762 062706 
960 012766 
012766 104464 
012770 000003 
012772 015145' 
012774 = 014734" 
961 
962 012776 000654 
963 013000 
013000 012746 
013004 012746 
013010 010600 
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ENT CSPNTF 


ADD #4, SP 
*AND DATA COMPARISON ERROR 
Reecricrsirrsr toteeteiteier ten ietirtit 
ERROR CALLS 
Biccesesettesstesiettertertietsrtssissrser tert es 


ERRSOFT 4, MSGO4,. MSGCDY ATR ERROR : LOG ERROR, 
TRAP TSERCODE. 
.WORD 4 
.WORD MSGO4 


.WORD MSGCD4 
+PRINT ERROR AND 
+ BRANCH 


BR 11$ R 
1: PRINTF #LFCR ; PRINT CARRIAGE RETURN LINE FEED 
MOV RLFCR, -(SP) 
MOV #1,-(SP) 
MOV SP, RO 
EMT CSPNTF 
AD #4, SP 
ERRH®D 1,MSG01,MSGC01 + TIME-OUT ERROR : LOG ERROR, 
TRAP TSERCODE 
.WORD 1 
.WORD MSGO1 
.WORD MSGCD1 
BR 11% + BRANCH 
2%: PRINTF &LFCR *PRINT CARRIAGE RETURN LINE FEED 
MOV aLFCR, -(SP) 
MOV #1,-(SP) 
MOV SP,RO 
ENT CSPNTF 
ADD #4, SP 
ERRSOFT 2,MSGO2. MSGCD2 *RETRY ERROR : LOG ERROR, 
TRAP TSERCODE 
-WORD 2 
.WORD MSGO2 
-WORD MSGCD2 
-PRINT ERROR AND 
BR 11% > BRANCH 
3S: PRINTF #LFCR >PRINT CARRIAGE RETURN LINE FEED 
Mov #LFCR, -(SP) 
MoV #1,-(SP) 
MoV SP,RO 
EMT CSPNTF 
ADD #4, SP 
ERRSOFT 3.MSGO3,MSGCD2 *DSW ERROR : LOG ERROR, 


TRAP ails 


WORD MSGO3 
WORD MSGCD2 
;PRINT ERROR AND 
NCH 


BR 11% > BR 
7%: PRINTF #LFCR ; PRINT CARRIAGE RETURN LINE FEED 
MOV aLFCR,- (SP) 
MOV ni,- (SP) 
MOV SP. RO 


SEQ 0054 


ee 


EE ee 


OZKCH 


964 


972 


976 
977 
978 
979 
980 


MACRO M11 
CHECK ERRORS-CHECK FOR 


013012 
013014 


013046 
013050 


013054 
013060 
013064 
013064 
013066 
013072 
013076 
013102 
013104 
013106 
013112 
013116 
013122 
013122 
013126 
013132 
013134 
013136 
013142 
013142 
013146 
013152 
013154 


013234 
013240 


013244 
013250 


104017 
062706 


005046 
156316 
005046 
156316 
012746 
012746 
010600 
104017 
062706 


062703 
0001 37 


005046 
156316 
012746 
012746 
010600 
104017 
062706 
062703 
0001 37 


012746 
012746 
010600 
104017 
062706 


012746 
012746 
010600 
104017 
062706 
116300 
005400 


005046 


0001 37 
005037 


10- 


tts 10:16 PAGE 18-3 


BAD CRC 


000004 


005254 ' 
005253’ 
014627" 
000003 
000010 
000006 
012530' 


005253" 
015242' 
000602 


000006 
000006 
012530’ 
015436' 
000001 
000004 
014563' 
000001 


000004 
005255" 


005257’ 


005253" 


005252 ' 
014450" 
600005 


000014 
000006 
012530' 


007224 ' 


5S: 


108: 


6$: 


PRINTF 


ADD 
JMP 
PRINTF 


ROD 
JMP 
PRINTF 


PRINTF 


MOVB 
NEG 
PRINTF 


ADD 
JMP 


CLR 
POP 


D § 


ENT 


CSPNTF 


ADD #4, SP 
#CRCMSG, <B, ERRTBL+1(R3)>, <B. ERRTBL+2(R3)> 
CL - (SP) 


#6,R3 

11$ 

satiate ia 
L 


#NZ209 


A 
ERRTBL+3(R3),RO 
RO 


eFMTOL, <B- ERRTBL 
CL 


#6,R3 
11% 


ERRPNT 
CR1,R3,R4,R2> 


ERRTBL+2(R3), (SP) 
- (SP) 
ERRTBL+1(R3), (SP) 


#CRCMSG. - (SP) 


#3,-(SP) 


SP, RO 
CSPNTF 
#10, SP 


~{§ 


*PRINT CRC MESSAGE 
UPDATE ERROR TABLE POINTER 


cae *+PRINT TO OPERATOR-ON-LINE MSG 
) 


ERRTBL+1(R3), (SP) 
RONMSG, - (SP) 


#2, -(SP) 


+ADJUST ERROR POINTER 
*PRINT CARRIAGE RETURN. 


ALFCR, -(SP) 


#1,-(SP) 


SP, RO 
CSPNTF 
#4, SP 


#200, - (SP) 


- (SP ) 


ERRTBL+5(R3). (SP) 
RO, - (SP) 


=(SF 2 


ERRTBL+1(R3). (SP) 
(SP) 


ERRTBL+0(R3). (SP) 
RF MTO1,-(SP) 
#5,-(SP) 


SP, RO 
CSPNTF 


ni4, SP 
*UPOATE ERROR POINTER. 


*RESET ERROR POINTER 
*RESTORE REGISTERS 


+0(R3)>, <B, ERRTBL+1(R3)>, <RO>. <BL ERRTBL4+5(R3)> 


ee re we eer 


SEQ 0055 


Se a ee SS i Sn ee a 





eee Ee 


D2KCH MACRO M11 10-OCT-77 10:16 PAGE 18-4 
CHECK ERRORS-CHECK FOR BAD CRC 


013250 012601 
013252 0126023 
013254 012604 
013256 012602 
981 013260 000207 RTS PC *RETURN 


SS eee se 


OZKCH MACRO M11 


CLEANUP CODE 


995 013262 
013262 

996 

997 013262 
013262 
013262 


104012 


10-OCT-77 10:16 PAGE 19 


Re Ve Ve Be We Be Be We Be 


4 


BGNCLN 


.SBTTL CLEANUP CODE 


AEAAAARARAAAA ALARA AAA AAA AA AAA AAA AA AAA AAA AAAI AAA AEA AKE 
THIS CALL RETURNS THE DEVICES UNDER TEST TO A STATIC 
STATE IF THE ENDINT CALL 1S USED. THE CLEANUP CODE IS 
ESPECIALLY REQUIRED WHEN A FUNCTION LEVEL DIAGNOSTIC 
1S RESIDENT WITH BOTH AN ON LINE SUPERVISOR AND AN 
flceen SYSTEM TO WHICH THE TEST DEVICE MUST BE 

a Pre orrn S 
KAAAAAA AAA A AAA AAA AAA KAKA AAA AAA AAA KARA 


LSCLEAN: - 


ENDCLN 
L10007: 


EMT CSCLEAN 


SEQ 6057 


eee ene eee ee so. 
rn es re re rr ee 


ne 


~—— 


D2KCH 


MACRO M11 
LPC-PST ROUTINE 


013264 
013270 
013272 
013276 
013302 
013304 
013312 
013320 
013326 
013332 
013340 
013344 
013346 
013354 
013354 
013356 
013360 


005737 
100025 
013703 
020327 
103020 
112763 
116263 
116263 
062703 
112763 
010337 
005726 
012737 


012746 
163 
104377 


005142’ 


007224" 
001742 


000006 005252’ 
000306' 005253' 
000307’ 006254 ' 


005252" 


000006 
177777 
007224 ' 


H00uU01 


001 
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we We Be Be Be We 


CRCAST: 


.SBTTL CRC-AST ROUTINE 


KAXAAAAAAAAAAAAA AAA AA AAA AAA AAA AAA AAA AAA AAA AKA KKK 
ROUTINE CHECKS FOR DEVICE 1/70 ERRORS UPON A 

REQUEST FOR BAD CRC GENERATION, LOGS THE ERRORS 

AND SET AN INDICATION FOR AST 

COMPLETION... 

RERAAKAKA AAA AAA AAA AAA AAA AAA AAA A AAA AAAS 


ISTATO > TEMPORARY 

1% > 1F NO RETRY THEN EXIT 
ERRPNT.R3 *GET POINTER TO ERROR TABLE 
R3, #994. *ERROR TABLE FILLED? 


1$ > IF FILLED EXIT 

#6, ERRTBL+0(R3) +LOAD ERROR TYPE 
UNTBL+0(RZ),ERRTBL+1(R3);LOAD TERMINAL NUMBER 
UNTBL+1(R2Z2), ERRTBL+2(R3);LOAD CONTROLLER NUMBER 
#6,R3 UPDATE ERROR POINTER 
#-1,ERRTBL(R3) *END OF ERRORTABLE FLAG 


R3,ERRPNT + SAVE ERROR POINTER 
(SP )+ >AS PER RSX--ASTXSS 
#1.CRCFLG ;SET AST INDICATOR 
; RETURN 
(PC )+,-(SP) 
rts. «4 
04377> 


SEQ 0058 


ee ee a oT eRe ee ne 


OZKCH 


MACRO 


Mil 


HST SERVICE ROUTINE 


1076 
1077 
1078 


013362 
013362 
013366 
013372 
013372 
N13374 
013376 
013400 
013402 
013404 
013406 
013412 
013416 
013420 
013424 
013430 
012432 
013434 
013436 
013440 
013444 
013446 
013450 
013452 
013454 
013460 
013464 


013542 
013544 


012637 
011637 


010046 
010146 
010246 
010346 
010446 
010546 
013705 
162705 
006205 
010537 
016505 
111501 
105015 
110105 
005004 
120564 
001402 
005724 
C00773 
006204 
013701 
013703 
020327 
103153 
005737 
100423 
105711 
100431 
105764 
001411 
105064 
112763 
110563 
062703 
023727 
103126 
000446 


005202' 
005204 ° 


O0£& 202" 
005142" 


007260 ' 
001016' 


000506 ° 


005202’ 
007224 ' 
001742 


005204 ' 


000706 ' 


000706' 
000005 
005253 ' 
000006 
007224 ' 


005252’ 


001742 
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AST. 


r 
to 
si 


21%: 


4S: 


A 
SEQ 0059 
_SBTTL AST SERVICE ROUTINE 


AEXAAAATAA AAA AA AAA AAA AAA AAA AAA AAA AAA AA AAA KAKA KAA EKK 
THIS ROUTINE CALCULATES THE TERMINAL NUMBER OF THE 
DEVICE WHICH INTERRUPTED, PROCESS ANY ERRORS FROM 

THOSE DEVICES, (1.E TIME-OUT, DEVICE NOT READY. AND DATA 
ERRORS E.T. C)RECOROS ANY AND ALL 

TERMINALS WHICH GOES OFFLINE.OR RETURNS ONLINE AND 
FREES AN OUTPUT BUFFER. . 

RERKAAAK AAA AA AAA REA AAA AAA AAA AAA AAA AA AAA AAA EEK 


POP 1SB GET ADDRESS OF I70 STATUS BLOCK 
MoV (SP). 1O0SW *GET DSW PRIOR TO AST ROUTINE 
PUSH CRO, R1I-RZ,R3,R4,R5> SAVE REGISTERS 


MoV ISB, R5 SAVE ADDRESS OF 170 STATUS BLOCK 

SUB #ISTATO. RS CALCULATE TERMINAL WHICH INTERRUPTED 

ASR RS -GET BUFFER CONTAING INTERRUPTING TERMINAL 
MOV RS, TSTBUF >SAVE BUFFER FOR DATA COMPARE 

MOV OBUFF CRS), RS STORE ADRRESS OF OUTPUT BUFFER 

MOVB (R5),R1 +GET AND SAVE TERMINAL SB 

CLRB (RS) *CLEAR THE 1°ST BYTE IN THE BUFFER 

MOVB Ri,RS STORE SB IN R5 


CLR RY “OFFLINE TABLE POINTER 


CMPB RS, DEVTABCRY ) *>F IND OFFSET FOR OFFLINE TABLE 
BEQ 21% *BRANCH IF FOUND 

TST CRY) + UPDATE POINTER 

BR 22% + CONT I NUE 

ASR RY *ADJUST OFFLINE TABLE POINTER 
MOV ISB, Ri GET 170 STAT 

MoV ERRPNT,R3 GET ERROR POINTER 

CMP RS, #994. CHECK ERROR TABLE 

BHIS 8% *BRANCH IF ERROR POINTER = 994 
TST 1O0SW CHECK DSW ERRORS 

BMI 14 -BRANCH IF ERROR 

TSTB (R1) *CHECK IOSTAT ERRORS 

BMI 23 *BRANCH IF ERROR 

TSTB OFFLINCRY} *WAS DEVICE OFFLINE? 

BEQ 4% >BRANCH IF NO------- 

CLRB OFFLINCRY) »MAKE 17 ON LINE 

MOVB #5, ERRTBL+0(R3) *STORE ON-LINE CODE 

MOVB RS, ERRTBL+1(R3) > STORE TERMS 

ADD #6,R3 >ADJUST POINTER 

CMP ERRPNT, #994. CHECK ERROR TABLE 

BHIS 8% >BRANCH IF FILLED 

BR 34% > TEMPORARY BYPASS 


- ei satiate all 


OZKCH MACRO M11 


HST SEPVICE ROUTINE 
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/RETRY ROUTINE ERROR STUB INSERTED HERE XXXXHKEAKAKAYRAE EERE 


SEQ 0060 


ee = 


ae ee 


OZKCH MACRO M11 10-OCT-77 16:16 PAGE 23 
HST SERVICE ROUTINE SEQ 0061 
1094 
fone ;PROCESS DSW ERRORS 
1097 013646 112763 000003 05252' 1S: MOVB #3, ERRTBL+0(R3) *MGV DSW ERROP-TYPE TO ERROR TABLE 
1098 013554 110563 005253’ MOVB R5, ERRTBL+1(R3) *LOAD TERMINAL# IN ERROR TABLE 
1099 013560 062703 000006 ADD #6,R3 UPDATE ERROR POINTER 
fen 013564 000515 BR 8% *BRANCH TO ASTX$S EXIT 
1102 
1103 
1104 
1105 
1106 
1 +A +PROCESS IOSTAT ERRORS... 
1 
1109 013666 121127 000277 25: CMPB (R1), #277 > OFFLINE 
1110 013572 001012 BNE 11% 
1111 013574 105764 000706’ TSTB OFFLIN(RY) *ALREADY OFFLINE? 
1112 013600 001107 BNE 8S *YES - JUST IGNORE 
1113 013602 112764 000001 9009706' MOVB #1, OF FLINCRY) *MARK IT OFFLINE 
1114 013610 112763 000010 005252' MOVB #10. ERRTBL+0(R3) 
1115 013616 O00403 BR 12% 
1116 013620 112763 000001 005252' MOVB #1, ERRTBL+0(R3) *PUT HARD ERROR TYPE IN ERROR TABLE 
1117 013626 110563 005253" 12 MOVB RS, ERRTBL+1(R3) *LOAD TERMINAL# INTO ERROR TABLE 
1118 013632 112163 005255' MOVB (R1)+, ERRTBL+3(R3) :LOAD 1ST WORD IOSTAT 
1119 013636 005201 INC R1 ;GET 2'ND 170 STAT WORD 
1120 013640 111163 005257' MOVB (R1),ERRTBL+5(R2) *LOAD 2ND WORD IOSTAT 
1121 013644 062703 o00006 ADD #6.R3 ; UPDATE ERROR POINTER 
1122 013650 005741 TST -(R1) >CHECK 1ST WORD OF IOSTAT 
1123 013652 122711 177765 CMPB #-13.(R1) *1S lOSTAT = -137 
1124 013656 001726 BEQ 4S iF YES CHECK ERROR TABLE 
1125 013660 000457 BR S$ >ASTXSS - EXIT 
1126 


ee ee rece ee — 


OZKCH 


29 


013662 
013666 


WAWWWWWw 
NOW ESWN oO 

Oo 

—_ 

tw 

o 

™N 

Ls) 


Ff fcww 
N—OwWW 
oO 
— 

Ww 
N 
i 
oO 


1155 014004 
1156 014010 
1157 014012 
1158 014016 
1159 014020 
1160 014026 
1161 014032 
014032 
014034 
014036 
014040 
014042 
014044 
1162 014046 
014046 
014050 
014052 


MACRO M11 
HST SERVICE ROUTINE 


013701 
016102 
016104 
062702 
012737 
005001 
020137 
001440 
00£201 
122224 
001772 
005737 
001432 
020327 
103027 
112763 
110563 
013700 
116063 
110163 
005337 
124244 
111263 
111463 
122224 
062703 
000735 
112763 
010337 


012605 
012604 
012603 
012602 
012601 
012600 


012746 
163 
104377 


007260" 


3 
000012 
005240 ' 


007232' 
001742 


000004 
005253" 
005202 ' 
000002 
005255 ' 
007232" 


005256 ' 
005257" 


000006 


177777 
007224 ' 


001 


007232" 


005252" 


005254 ' 


005252' 
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>FROM RETRY ERROR 
COMPARE 1/0 DATA BUFFER............ 


33: 
5S. 


6S: 


8S: 


ASTX$S 
MOV 
. BYTE 


TSTBUF.R1 
OBUFF(R1),R2Z 
INBUFF(R1),R4 


#3,R2 

#10. ,ERRTMP 
R1 

Ri, LENGTH 
8S 


Ri 

(RZ)+, (RY) + 
6$ 

ERRTMP 

8% 

R3, #994. 

8% 


#4,ERRTBL+0(R3) 
R5, ERRTBL4+1(R3) 
(SB. RO 

Z(RO), ERRTBL+2(R3) 
Ri, ERRTBL+3(R3) 
ERRTMP 
-(R2Z),-CRY) 

(RZ). ERRTBL+4(R3) 
(RY), ERRTBL+5(R3) 
(RZ2)+, (R4Y)+ 

#6,R3 

6% 


#-1,ERRTBLIR3) 
R3,ERRPNT 
CR5.R4,R3,R2.R1,RO> 


115..1 
0<377> 


GET OUTPUT BUFFER POINTER 

*STARTING ADDRESS OF OUTPUT BUFFER 

*+STARTING ADDRESS INPUT BUFFER 

*+GET OUTPUT DATA BYTE 

+170 DATA POINTER 

*CLEAR BYTE COUNTER. 

*AT END OF RECORD? 

+ YES-EXIT. 

+ NO-UPDATE BYTE COUNTER BY ONE. 
+170 DATA OK? 

;GET NEXT DATA & BRANCH IF YES 
+MORE THAN 10 170 ERRORS STORED? 
SAF YES - EXIT 

ERROR TABLE FILLED? 

*BRANCH IF YES - EXIT 

*FILL ERROR-TYPE IN ERROR TABLE 
FILL TERMINAL& IN ERROR TABLE 


*FILL BYTE COUNT 

*SET BYTE COUNTER 

+170 DATA ERROR INDICATOR 
*DECREMENT DATA POINTERS 
*FILL GOOD DATA 

+FILL BAD DATA 

> INCREMENT DATA POINTER 


>SET TABLE TERMINATOR 
>STORE TABLE POINTER 


>EXIT 


SE@ 0062 


OZ2KCH 
PRINT MODULE 


ee? oe oP ot a o ® 5 
PP et oe et > > ®t od gt 
o 
oo 


lee el ed ee 
OP ee et et et ot et ee et 
o 
oO 


187 014054 
014054 
1188 014054 
014054 
014056 
014062 
014064 
014070 
014072 
014076 
014102 
014106 
014110 
014112 


1190 014116 
014116 
014120 
014124 
014126 
014132 
014134 


MACRO M11 


005046 
156316 
005046 
156316 
005046 
156316 
012746 
012746 
010600 
104014 
062706 


005046 


005254 ' 
005253’ 
005252' 


014206’ 
000004 


000012 


005257" 
005256 ' 
005255 ' 


014336" 
000004 


000012 
000006 
000004 


005253" 


005252 ' 
005245" 
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.SBTTL PRINT MODULE 


, ++ 
PRINT MODULE 


; INPUT R32 = 
SOUTPUT R3 


;ERROR PACKET 1S SIX BYTES IN THE FOLLOWING ORDER 
MEANING 


BYTE 


Mme iWN—O 


BW» Qe Ve Vn Bs Vo Ss Ba 


POINTER TO ERROR PACKET 
POINTER TO NEXT PACKET 


ERROR CODE 

TERMINAL NUMBER 
RECEIVED BYTE COUNT 
ERROR BYTE COUNTER 
GOOD DATA 


BAD DATA 


enieieeeeeestenememanneeiemene 


SEQ 0063 — 


; NOTE: : : ROUTINE PRINTS REPEATING ERRORS FOR THE SAVE TERMINAL AND SAME TYPE OF ERRROR 


BGNMSG MSGCD4 


MSGCDS4: : 


PRINTB 


25: PRINTB 


~ (SP) 


ERRTBL+2(R3), (SP) 


-(SP) 


ERRTBL+1(R3), (SP) 
- (SP) 
ERRTBL+O(R3). (SP) 


RF ORMI,-(SP) 
#4,-(SP) 

SP. RO 
CSPNTB 

#12. SP 


- (SP) 


ERRTBL+5(R3). (SP) 


“(SP ) 


3%: 
ENOMNSG 


#6,R3 
#4, ERRTBL(R3) 
3% 


ERRTBL+1(R3),ERRTBL-S(R3) 
2$ > SAME TERM. 


“($s 


ERRTBL+4(R3), (SP) 
P) 


ERRTBL+3(R3), (SP) 


RFORM3, - (SP) 
#4,-(SP) 

SP, RO 

CSPNTB 

#12. SP 


mFORMI, <B. ERRTBL+O(R3)>, (B, ERRTBL4+1(R3)>, (BL ERRTBL+2(R3)> 


nFORMS, <B. ERRTBL+3(R3)>, <B. ERRTBL+4(R3)>, <B, ERRTBL4+5(R3)> 


>POINT TO NEXT PACKET 
*CHECK NEXT ERROR TYPE 
*BRANCH IF NOT 


* TERMINAL NUMBER 


OUTPUT ERROR 


See 


nh 5 
DZKCH MACRO M11 10-OCT-77 10:16 PAGE 25-1 
PRINT MODULE 


SEQ 0064 — 
014204 L 10010: | 
oe 014204 104023 ENT CSMSG ) 


s 


DZKCH 


MACRO M11 


PRINT “ODULE 


1 
1207 


1208 


1209 


1210 


014206 
014211 
014214 
014217 
014222 
014225 
014230 
014233 
014236 
014241 
014244 
014247 
014252 
014255 
014260 
014263 
014266 
014271 
014272 
014275 
014300 
014303 
014306 
O143i1 
014314 
014317 
014322 
014325 
014330 
014333 
014336 
014341 
O14 344 
014347 
014352 
014355 
014360 
014363 
014366 
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ORM1: 


FORMS: 


. EVEN 


KAASAAAAAA AAA A AAA AAA AAA AAA AAA AAA AAA AAA AAA AA AKAE 


GLOBAL ASCI! MESSAGES USED BY THE PROGRAM 


MEAAAAAAAAAAAA AAA AAA AAA AAA AA AAA AA AAA A AAA AA AAA AEE 


. ASCII 


.ASCIZ 


.ASCIZ 


7%R ERRORTYPE=%02%A SBR=%D2%A RECEIVED BYTE 


77N%4R =o BYTE-NUMBER 


GDDATA 


"ZN%ZS14%403%S89%03%S15%03%N" 


BDDATA/ 


COUNT=%D3/ 





DZ2KCH MACRO M11 
PRINT MODULE 
1212 014370 
014370 
1213 014370 116300 
1214 014374 005400 
1215 014376 
14376 005046 
014400 156316 
014404 010046 
014406 005046 
014410 156316 
014414 905046 
014416 156316 
014422 012746 
014426 012746 
014432 010600 
014434 104014 
014436 062706 
1216 
1217 
1218 014442 062703 
1219 
1220 014446 
014446 
014446 104023 
1221 014450 O45 
014453 105 
014456 117 
014461 124 
014464 105 
014467 104 
014472 101 
014475 102 
014500 O45 
1222 014503 G45 
014506 122 
014511 055 
014514 115 
014517 124 
014522 125 
014525 103 
014530 105 
014533 055 
014536 063 
014541 040 
014544 124 
014547 103 
014552 116 
014555 045 
014560 045 
1223 014563 045 
014566 101 
014571 123 
014574 061 
014577 040 
014602 122 
014605 105 
014610 117 
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BGNMSG MSGCD1 
MSGCD1: - 


005255" =e hla: 
PRINTB SPITOL. <8 ERRTEL*O(RS)>, (8. ERRTOL41(R3)>, (ROD. <8, ERRTELOS(RS)? 
005257' BiSB ERRTBL4+5(R3), (SP) 
Nov RO, -(SP) 
CLR - (SP) 
005253" BiSB ERRTBL+1(R3), (SP) 
CLR - (SP) 
005252’ BiSB ERRTBL+0(R3), (SP) 
014450" MOV RFMTO1,-(SP) 
000005 MOV #5,- (SP) 
MOV SP,RO 
EMT CSPNTS 
000014 ADD #14, SP 
+;NOTE THE DEVICE WENT 
> OFF-LINE 
000006 ADD #6,R3 
+ UPDATE THE POINTER 
ENDMSG 
L10011: 
EMT C$MSG 
101 O4O FMNTO1: .ASCII 7%A ERROR-TYPE=%D2%A SBH=%D3/ 
122 122 
122 055 
131 120 
075 O45 
062 04s 
G40 123 
043 075 
104 063 
241 4m -ASCIZ 7%A RSX-11M STATUS CODE= -%D3%A BYTE COUNT=%D4%N/ 
1 
061 061 
040 123 
101 124 
123 040 
117 104 
075 040 
O45 104 
045 101 
102 131 
105 040 
117 125 
124 075 
104 064 
116 000 
116 04S M200: -ASCIZ "“Z%NZ%A RSX-11M HARD ERROR DETECTED: %N" 
040 122 
130 055 
061 115 
110 101 
104 040 
122 122 
122 040 


oe we ee 


’ 
; 
ES - 
TT eee ad 
LF A ES NE ES SE EE SS 


tetera: me ose. 





DZ2KCH 


MACRO M11 


PRINT MODULE 


1224 


1225 


1226 


014613 
014616 
014621 
014624 
014627 
014632 
014635 
014640 
014643 
014646 
014651 
014654 
014657 
014662 
014663 
014666 
014671 
014674 
014677 
014702 
014705 
014710 
014713 
014716 
014721 
014724 
014727 
014732 
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CRCMSG: 


ASCII 


-ASCIZ 


EVEN 


"“NZABAD CRC FROM TERMINAL%D3" 


"%A, WAS NOT DETECTED BY CONTROLLER %D1%N" 


———__ sieeeeeenteeeen ee - 


ee ee 


SEQ 0067 


qowrremmpenpmarens - tenn ee 2 me 


DZ2KCH 


MACRO M11 


PRINT MODULE 
1228 014734 


1229 


1230 
1231 


1232 


1233 


1234 


014734 
014734 
014734 
014736 
014742 
014744 
014750 
014752 
014756 
014762 
014766 
014770 
014772 
014776 
015002 
015002 
015002 
015004 
015007 
015012 
015015 
015020 
015023 
015026 
015031 
015034 
015037 
015042 
015045 
015050 
015053 
015056 
015061 


005046 
156316 
005046 
156316 
005046 
156316 
012746 
012746 
010600 
104014 
062706 


062703 


104023 


005254" 
005253’ 


005252’ 
015004" 


000004 


000012 
000006 
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BGNMSG MSGCD2 
MSGCDZ: : 
PRINTB 


ENDMSG 
L10012: 


ADD 


O4O FMTOZ: . ASCII 
1 


-RASCIZ 


EVEN 


#6,R3 


EMT 
7“%A ERROR-TYPE=%D2%A SBR=%D3/ 


ERRTBL+2(R3), (SP) 
-(SP) 
ERRTBL+1(R3), (SP) 
- (SP) 
ERRTBL+O(R3), (SP) 


RF MTOZ, -(SP) 
#4, - (SP) 


SP, RO 
CSPNTB 
#12, SP 


CSMSG 


/ARBYTE COUNT=%D4%N/ 


— Sst -_—— 


SEQ 0068 — 


DZKCH 


MACRO M11 


PRINT MODULE 


1238 


0 
1239 


0 
1240 


1241 


1242 


0 
1243 


015062 
015065 


015070 
015073 
615076 
015101 
015104 


015314 
015317 
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MSGO1: 


MSGO2: 


MSGO3: 


MSGO4: 


ONMSG: 


EOP: 


NE NTE SS Sse sesinssyssaassnesisasieniieilienseneeeeerestinnmnsiememmasimuiiiiinnsnss -_— oe 


-GLOBAL TEXT 


.ASCIZ /TIME-OUT ERROR: TERMINAL IS OFF LINE/ 


-ASCIZ RETRY ERROR: / 


.ASCIZ /DSW ERROR: DIRECTIVE WAS NOT ACCEPTED/ 


.ASCIZ DATA COMPARISON ERROR: / 


-ASCIZ ““NZATERMINAL SB. %D2%A BACK ON LINEXN" 


-ASCII = "ZNZARCTIVE PASSES SINCE LAST REPORT=%D6" 


SEQ 0069 


ee 


O2KCH MACRO M11 
PRINT MODULE 
015322 105 
015325 101 
015330 105 
015333 123 
015336 103 
015341 114 
015344 124 
015347 105 
015352 122 
15355 O45 
1244 015360 045 
015363 040 
015366 103 
015371 126 
015374 124 
015377 115 
015402 101 
015405 075 
15410 063 
1245 015411 045 
15414 040 
015417 115 
015422 045 
015425 O45 
015430 Cus 
015433 O45 
1246 015436 O45 
015441 116 
1247 
1248 
1249 
1250 
1251 
1252 
1253 
254 015443 
015444 
1255 
1256 000001 


EE 
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LFCR: 


LASTAD 


LSLAST: 


-ASCII "ZA, ACTIVE TERMINALS=%D3" 


-ASCIZ "ZA, TIME=%02%A: %22%N" 


/ASCIZ = "“ZNZN" 


MERKAAAAAAAA AAA AAA AAA KAA KAA AAA AEA AAA AREA 
THE FOLLOWING CALL GENERATES THE FIRST EVEN ADDRESS NOT 
USED BY THE PROGRAM........ 

2 2 8 9d 9 9D 09 E80 od 0002 dd F005 0 000900055 055055950500056 66 


EVEN 


.BLKW =2024. >FREE MEMORY AREA 


_ END 


Se eset ses tse stesso 


SEQ 0970 


Ne ae ee ree wee a ee eS 


Tee eee teeters 
- eee 


OZ2KCH 


MACRO M11 


SYMBCL TABLE 


O00244R 
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CS$GTIM= 
CSINIT= 
CSINLP= 
CSKWOF = 
CSKWON= 
CSLGOF = 
CS$LGON= 
CSLOOP= 
CSMANI= 
CSMPNE= 
CS$MSG 
CSPNTB= 
CSPNTF= 
CSPNTN= 
CSPNTS= 
CSPNTX= 
CSPOIN= 
CSPWR = 
C$QIC = 
CSREFG= 
CSRELA= 
CSRELM= 
CSRELO= 
CSREQT= 
CSRESE= 
CSREVI= 
CSRrT = 
CSSEFG= 


000066 
000011 
000020 
000042 
000041 
000027 
000026 
000100 
000065 
000051 
000023 
000014 
000017 
000013 
000016 
000015 
000040 
000073 
000377 
000064 
006052 
000053 
000037 
000060 
000040 
000001 
000025 
000062 
000046 
000044 
000035 
000063 
000030 
000031 


011760RG 
= 000003 


000302R 
O00506R 
007250R 
007252R 
007254R 


012Z256RG 


012272R 
015311R 
000262R 
007224R 
005252R 
007232R 
0072 26P 
007237R 
0072Z40R 
007242PF 


012054RG 
0121 34RG 


014450R 
015004R 
014206R 


O14 336R 
000015 
000040 
000007 
000016 
000041 
000004 
000013 
000006 
000000 
000011 
000017 
000012 
000003 
000005 
000010 
000002 
000014 
00000: 
000100R 
000132R 
000254R 
000400 
000002 
000001 
000000 
000400 
000376 
000001 
000002 
000000 
000140 
000000 
000040 
000200 
000120 
000020 
000109 
000004 
000010 
000004 
000006 
000004 
000003 
000002 
000000 
Ov0002 
000016 
000014 
000004 
000006 
000010 
000002 
000012 
ooco00 
003122R 
003322P 


Ya 

= 

“W 

co 
| 


LSDEPO 
LSDEVP 


003522R 
003722R 
004122R 
004 322R 
004522R 
004722R 
003102R 
010536R 
O05204R 
005122R 
000276R 
000012 
HXXXXKK 
000014 
000016 
000020 
000022 
000024 


= AXXXxKX 


000006 
000002 
000010 
000004 
003400 
002400 


005202R 
005142R 
005146R 
005152R 
005156R 
005162R 
005166R 
005172R 
N05176R 


000041 
000041 
000041 
000041 
000041 
000041 
000041 
000041 
00004 | 
000041 
00004 1 
000041 
000041 
000041 


GX 


GX 


NOS24OR 
G15436R 


000011 


OO5244R 

000070RG 
DNOOOY4RG 
013262RG 
000011RG 
Q00052PG 


L$D1SP 


SEQ 0071 


007326RG 

000202RG 

000062RG 

OCOOG4RG 

000206RG 

OCO040RG 

000072R6G 

000210RG 

900024RG 

000032RG | 

O00034RG | 

000036RG | 

007266RG | 

000046RG 

OCOOS6RG 

007314RG 

00004 2RG 

007330RG 

000076RG 

015444RG 

00001 2RG 

OOOOOORG 

000074RG 

OCOOSY4RG 

000010RG 

007322RG 

007320RG 

OOCO30RG 

OOOOSORG 

OOOO6ORG 

O00066RG 

007322RG 

000022RG 

000020RG | 

000016RG | 

000014RG | 

007312R | 

007316R | 

007320R | 

007322R | 

007322R 

010672R | 

011742R | 

013262R | 

014204R : 

O14446R | 
| 
| 
| 
! 
| 
| 


ere Gee ry ese GEE en cree eer ee — ee - 


—_ ee reese eee ane 


015002R 
010767R 
011744R 
011101R 
014370RG 
O14734RG 
O14054RG 
010674R 
015062R 
015127P 
015145" 


OZkCH MACRO M11 
SYMBLL TABLE 
13G04% ## 015213 
MSGI 011020R 
MSG2 011162k 
MSGi 0112306R 
4200 014S563k 
NP = 000001 
NUMDEY Q00304R 
OBUFF  Q001016R 
OBUFO  O01041R 
OBUF1 001245R 
OBUF2 O01451R 
OBUF2 001655R 
OBUF4Y QO02061R 
OBUFS  #002265R 
OBUF& $002471R 
OBUF 7 02675R 
OFFLIN O00706R 
ONMSG 015242R 
OSAPTS= CO0000 
OS$AU = 000000 
ABS. o00000 


025364 
ERRORS DETECTEC: 0 
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000 
001 


VIRTUAL MEMORY USED: 
DYNAMIC MEMORY: 


ELAPSED TIME: 


21140 WORD>d 
00: 02: 58 


22562 WORDS. 


DZKCH, D2KCH=DIAGSUPER/ML. OZKCH 


009010 


( §9 PAGES) 
( 31 PAGES) 


RTRY1 
RTRYZ 
RTRYZ 


SB 
SCBADR 
SCBCNT 
STADR 
START 
SVCCNT= 
SVCGBL= 
SVC INS= 
SVCSTK= 
SVCSUB= 
SVC TAG= 
SVCTST= 
SSLSYM= 
TEMP 
TEM3 
TERM 
TIMTF 


OO7Z44R 
007245R 
007246R 
0072568 
001006R 
001010R 


OOOCOORG 


011370R 
177777 
000001 
000001 
177777 
000001 
000001 
000001 
010000 
O07Z34R 
007230R 
007222R 
007Z35R 


TSTBUF 

TSARGC= 
TSCODE= 
TSERCO= 
TSERRN= 
TSEXCP= 
TSHILI= 
TSLOL i= 
TSLSYM= 
TSMCAL= 
TSNEST= 
TSNSKO= 
TSSAVL= 
TSSEGL= 
TSSUBN= 
TSTAGL= 
TSTAGN= 
TSTEMP= 
TSTEST= 
TSSCLE= 


See >> 


007260R 
000004 
000052 
000064 
000003 
000000 
000077 
000001 
010000 
000000 
177777 
000011 
177777 
177777 
000000 
177777 
010013 
000011 
000001 
019007 


TSSHAR= 
TSSHW = 


010000 


010006 


011370RG 


005250R 
O000306R 
000000 
000040 
000400 
000020 


XK44%% GX 
= 000004 


000020 
000002 
000250R 


SEQ 0072 


